jl154: #i113786# - Removing installed extensions fails because the extension manager has become somewhat slower. Use hCloseDialog() to close the extensionmanager and use a few waitslots should fix the problem.

testautomation/extensions/optional/includes/extensions.inc

@@ -620,9 +620,13 @@ testcase tExtensionsFunction
     ' uninstall all components, that were installed
     a = listCount(aRemovePackages())
     ToolsPackageManager
+
     kontext "PackageManager"
     If PackageManager.exists(10) then
+
         BrowsePackages.typeKeys("<home>")
+        waitslot()
+
         ii = 1
         while (ii < BrowsePackages.getItemCount +1)
             kontext "PackageManager"
@@ -630,6 +634,8 @@ testcase tExtensionsFunction
             'BrowsePackages.typeKeys("<down>")
             sTemp2 = sTemp
             BrowsePackages.select ii
+            waitslot()
+            
             sTemp = BrowsePackages.getItemText (ii,1)
             if right(sTemp,3) = "oxt" then
                 for x = 1 to a
@@ -665,7 +671,7 @@ testcase tExtensionsFunction
             ii = ii+1
         wend
         kontext "PackageManager"
-        PackageManager.close
+        hCloseDialog( PackageManager, "close" )
     else
         qaErrorLog "disabling installed extensions failed;"
     endif