--- a/ChangesBrowser.st	Tue Jan 18 18:07:34 2011 +0100
+++ b/ChangesBrowser.st	Tue Jan 18 18:08:03 2011 +0100
@@ -3040,7 +3040,7 @@
                                     varsInChange := (parseTree arguments at:2) evaluate asCollectionOfWords.
                                     varsHere = varsInChange ifTrue:[
                                         thisClass classVariableString asCollectionOfWords = (parseTree arguments at:3) evaluate asCollectionOfWords ifTrue:[
-                                            ((thisClass sharedPools size == 0) and:[(parseTree arguments at:4) evaluate = '']) ifTrue:[
+                                            ((thisClass sharedPoolNames size == 0) and:[(parseTree arguments at:4) evaluate = '']) ifTrue:[
                                                 ((selector endsWith:':category:')
                                                 and:[thisClass category ~= (parseTree arguments at:5) evaluate]) ifTrue:[
                                                     outcome := 'Category is different'.
@@ -3247,8 +3247,8 @@
     ].
     ^ isSame.
 
-    "Created: / 24.11.1995 / 14:30:46 / cg"
-    "Modified: / 13.2.2000 / 15:04:39 / cg"
+    "Created: / 24-11-1995 / 14:30:46 / cg"
+    "Modified: / 18-01-2011 / 17:56:04 / cg"
 !
 
 compareCommentChange:parseTree
@@ -6173,9 +6173,9 @@
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.408 2010-11-02 12:30:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.409 2011-01-18 17:08:03 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.408 2010-11-02 12:30:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.409 2011-01-18 17:08:03 cg Exp $'
 ! !