--- a/SystemOrganizer.st	Fri Aug 17 14:16:23 2001 +0200
+++ b/SystemOrganizer.st	Tue Aug 21 15:40:55 2001 +0200
@@ -50,19 +50,19 @@
 
 !SystemOrganizer class methodsFor:'instance creation'!
 
-for:aNameSpace
+for:aNameSpaceOrNil
     "create & return a new instance of myself, to organize aNameSpace.
      All of this here is mimicri - ST/X keeps the category in the class."
 
-    (aNameSpace isNil or:[aNameSpace == Smalltalk]) ifTrue:[
+    (aNameSpaceOrNil isNil or:[aNameSpaceOrNil == Smalltalk]) ifTrue:[
         CachedOrganizerForSmalltalk isNil ifTrue:[
-            CachedOrganizerForSmalltalk := self new nameSpace:aNameSpace.
+            CachedOrganizerForSmalltalk := self new nameSpace:aNameSpaceOrNil.
         ].
         ^ CachedOrganizerForSmalltalk
     ].
-    ^ self new nameSpace:aNameSpace.
+    ^ self new nameSpace:aNameSpaceOrNil.
 
-    "Modified: / 6.2.2000 / 20:25:50 / cg"
+    "Modified: / 21.8.2001 / 15:22:20 / cg"
 ! !
 
 !SystemOrganizer methodsFor:'accessing'!
@@ -112,9 +112,9 @@
     ].
         
     (searchedNamespace := nameSpace) isNil ifTrue:[
-        allNames := true.
         searchedNamespace := Smalltalk.
     ].
+    allNames := (searchedNamespace == Smalltalk).
     searchedNamespace == Smalltalk ifTrue:[
         categorySet := AllCategories.
     ] ifFalse:[
@@ -130,7 +130,7 @@
      (SystemOrganizer for:Demos) categories 
     "
 
-    "Modified: / 6.2.2000 / 20:33:42 / cg"
+    "Modified: / 21.8.2001 / 15:24:10 / cg"
 !
 
 categoryOfElement:aClassName
@@ -182,9 +182,10 @@
     classSet := IdentitySet new.
 
     (searchedNamespace := nameSpace) isNil ifTrue:[
-        allNames := true.
         searchedNamespace := Smalltalk.
     ].
+    "/ hack to enable ported tools (RefactoryBrowser) to see all classes
+    allNames := (searchedNamespace == Smalltalk).
 
     searchedNamespace allClassesDo:[:aClass |
         |cat|
@@ -210,7 +211,7 @@
      (SystemOrganizer for:Demos) listAtCategoryNamed:'Collections-Abstract' 
     "
 
-    "Modified: / 20.6.1998 / 13:34:19 / cg"
+    "Modified: / 21.8.2001 / 15:23:52 / cg"
 ! !
 
 !SystemOrganizer methodsFor:'change and update'!
@@ -243,5 +244,5 @@
 !SystemOrganizer class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/SystemOrganizer.st,v 1.9 2000-11-16 16:22:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/SystemOrganizer.st,v 1.10 2001-08-21 13:40:55 cg Exp $'
 ! !