--- a/SystemOrganizer.st	Thu Feb 04 12:48:07 2010 +0100
+++ b/SystemOrganizer.st	Tue Mar 09 13:09:51 2010 +0100
@@ -90,7 +90,7 @@
         |cat|
 
         aClass isMeta ifFalse:[
-            (aClass isNameSpace not) ifTrue:[
+            aClass isNameSpace ifFalse:[
                 cat := aClass category.
                 cat isNil ifTrue:[
                     cat := '* no category *'
@@ -159,8 +159,8 @@
             cats sort.
             AllCategories := cats.
         ].
-        (categoryArray notNil and:[categoryArray includes:newCategory]) not
-        ifTrue:[
+        (categoryArray notNil and:[categoryArray includes:newCategory])
+        ifFalse:[
             categoryArray := nil.
         ].
         ^ cls category:newCategory
@@ -188,7 +188,7 @@
         |cat|
 
         aClass isMeta ifFalse:[
-            (aClass isRealNameSpace not) ifTrue:[
+            aClass isRealNameSpace ifFalse:[
                 (allNames or:[aClass nameSpace == nameSpace]) ifTrue:[
                     cat := aClass category.
                     cat = aCategory ifTrue:[
@@ -239,5 +239,9 @@
 !SystemOrganizer class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/SystemOrganizer.st,v 1.12 2006-11-10 16:23:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/SystemOrganizer.st,v 1.13 2010-03-09 12:09:51 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libbasic3/SystemOrganizer.st,v 1.13 2010-03-09 12:09:51 cg Exp $'
 ! !