--- a/ChangesBrowser.st	Thu Nov 08 21:27:09 2001 +0100
+++ b/ChangesBrowser.st	Fri Nov 09 09:14:20 2001 +0100
@@ -2212,7 +2212,7 @@
                                     ].
 
                                     autoCompare value ifTrue:[
-                                        cls := Smalltalk at:clsName ifAbsent:nil.
+                                        cls := Smalltalk at:clsName asSymbol ifAbsent:nil.
                                         cls isNil ifTrue:[
                                             changeDelta := '+'.
                                         ] ifFalse:[
@@ -2474,7 +2474,7 @@
     self checkIfFileHasChanged
 
     "Modified: / 27.8.1995 / 23:06:55 / claus"
-    "Modified: / 5.11.2001 / 16:35:11 / cg"
+    "Modified: / 9.11.2001 / 02:24:46 / cg"
 !
 
 readXMLChangesFrom:aStream inBackground:inBackground
@@ -4608,5 +4608,5 @@
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.241 2001-11-05 18:03:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.242 2001-11-09 08:14:20 cg Exp $'
 ! !