--- a/Workspace.st	Sat Jan 15 14:21:55 2011 +0100
+++ b/Workspace.st	Sat Jan 15 14:23:57 2011 +0100
@@ -1539,7 +1539,8 @@
     self windowGroup withWaitCursorDo:[
         SharedPool allSubclassesDo:[:eachPool |
             (eachPool includesKey:sel) ifTrue:[
-                (UserPreferences current systemBrowserClass) browseClass:eachPool class
+                (UserPreferences current systemBrowserClass) 
+                    openInClass:eachPool class selector:#initialize
             ].
         ].
     ].
@@ -1860,9 +1861,9 @@
 !Workspace class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.229 2011-01-15 13:21:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.230 2011-01-15 13:23:57 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.229 2011-01-15 13:21:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.230 2011-01-15 13:23:57 cg Exp $'
 ! !