--- a/ClassCategoryReader.st	Mon Nov 19 10:25:14 2001 +0100
+++ b/ClassCategoryReader.st	Mon Nov 19 13:37:07 2001 +0100
@@ -230,8 +230,8 @@
     |aString done method compiler canMakeSourceRef sourceFile pos nm src s silent|
 
 
-    (silent := beSilent isNil) ifTrue:[silent := Smalltalk silentLoading].
-    silent == true ifFalse:[
+    (silent := beSilent) isNil ifTrue:[silent := Smalltalk silentLoading].
+    silent ~~ true ifTrue:[
         myClass isNil ifTrue:[
             nm := '** UndefinedClass **'
         ] ifFalse:[
@@ -427,6 +427,6 @@
 !ClassCategoryReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ClassCategoryReader.st,v 1.46 2001-08-17 12:37:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ClassCategoryReader.st,v 1.47 2001-11-19 12:37:07 cg Exp $'
 ! !
 ClassCategoryReader initialize!