--- a/Tools_ClassCategoryList.st	Wed Aug 23 19:33:29 2006 +0200
+++ b/Tools_ClassCategoryList.st	Wed Aug 23 19:33:37 2006 +0200
@@ -586,8 +586,7 @@
 
             (hideUnloadedClasses not or:[cls isLoaded])
             ifTrue:[
-                (cls isNameSpace not
-                or:[cls == Smalltalk]) ifTrue:[
+                (cls isNameSpace not or:[cls == Smalltalk]) ifTrue:[
                     (nameSpaceFilter isNil
                     or:[self isClass:cls shownWithNameSpaceFilter:nameSpaceFilter]) ifTrue:[
                         (packageFilter isNil
@@ -803,5 +802,5 @@
 !ClassCategoryList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassCategoryList.st,v 1.13 2006-08-23 09:49:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassCategoryList.st,v 1.14 2006-08-23 17:33:37 cg Exp $'
 ! !