*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Wed, 12 Apr 2000 23:41:37 +0200
changeset 925 95dda78c41a2
parent 924 41c0748bff4e
child 926 9e3b95bc9430
*** empty log message ***
SystemOrganizer.st
--- a/SystemOrganizer.st	Wed Apr 12 23:40:29 2000 +0200
+++ b/SystemOrganizer.st	Wed Apr 12 23:41:37 2000 +0200
@@ -85,7 +85,7 @@
         |cat|
 
         aClass isMeta ifFalse:[
-            (aClass isNamespace not) ifTrue:[
+            (aClass isNameSpace not) ifTrue:[
                 cat := aClass category.
                 cat isNil ifTrue:[
                     cat := '* no category *'
@@ -182,8 +182,8 @@
         |cat|
 
         aClass isMeta ifFalse:[
-            (aClass isNamespace not 
-            or:[aClass == Namespace 
+            (aClass isNameSpace not 
+            or:[aClass == NameSpace 
             or:[aClass == Smalltalk]]) ifTrue:[
                 (allNames or:[aClass nameSpace == nameSpace]) ifTrue:[
                     cat := aClass category.
@@ -233,5 +233,5 @@
 !SystemOrganizer class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/SystemOrganizer.st,v 1.6 2000-02-18 14:38:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/SystemOrganizer.st,v 1.7 2000-04-12 21:41:37 cg Exp $'
 ! !