--- a/ChangeSetBrowser.st	Wed Apr 09 11:17:01 2003 +0200
+++ b/ChangeSetBrowser.st	Wed Apr 09 12:54:57 2003 +0200
@@ -867,7 +867,7 @@
 
     change := changeSet at:changeNr.
     change isNil ifTrue:[^nil].
-    change isMethodChange ifTrue:[
+    change isMethodDefinitionChange ifTrue:[
         str := WriteStream on:''.
         str nextPutChunkSeparator.
         str nextPutAll:(change className , ' methodsFor:''' , change methodCategory , '''').
@@ -915,5 +915,5 @@
 !ChangeSetBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ChangeSetBrowser.st,v 1.32 2003-01-26 14:10:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangeSetBrowser.st,v 1.33 2003-04-09 10:54:57 cg Exp $'
 ! !