SystemOrganizer.st
changeset 969 3f3e9552e78b
parent 925 95dda78c41a2
child 994 fdfd49f4dc25
--- a/SystemOrganizer.st	Thu Aug 31 16:49:14 2000 +0200
+++ b/SystemOrganizer.st	Sun Sep 03 16:44:05 2000 +0200
@@ -12,6 +12,8 @@
 
 
 
+"{ Package: 'stx:libbasic3' }"
+
 Object subclass:#SystemOrganizer
 	instanceVariableNames:'categoryArray nameSpace'
 	classVariableNames:'AllCategories'
@@ -99,7 +101,7 @@
 
     AllCategories isNil ifTrue:[
         categorySet := Set new.
-        Smalltalk allBehaviorsDo:addClassAction.
+        Smalltalk allClassesDo:addClassAction.
         AllCategories := categorySet.
     ].
         
@@ -111,7 +113,7 @@
         categorySet := AllCategories.
     ] ifFalse:[
         categorySet := Set new.
-        searchedNamespace allBehaviorsDo:addClassAction.
+        searchedNamespace allClassesDo:addClassAction.
     ].
     categoryArray := categorySet asArray sort.
     ^ categoryArray
@@ -178,7 +180,7 @@
         searchedNamespace := Smalltalk.
     ].
 
-    searchedNamespace allBehaviorsDo:[:aClass |
+    searchedNamespace allClassesDo:[:aClass |
         |cat|
 
         aClass isMeta ifFalse:[
@@ -233,5 +235,5 @@
 !SystemOrganizer class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/SystemOrganizer.st,v 1.7 2000-04-12 21:41:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/SystemOrganizer.st,v 1.8 2000-09-03 14:44:05 cg Exp $'
 ! !