--- a/ChangesBrowser.st	Sun Dec 03 19:44:23 1995 +0100
+++ b/ChangesBrowser.st	Sun Dec 03 19:45:01 1995 +0100
@@ -797,10 +797,7 @@
 deleteChange:changeNr
     "delete a change"
 
-    changeListView deselect.
-    self silentDeleteChange:changeNr.
-    self setChangeList 
-
+    self deleteChangesFrom:changeNr to:changeNr
 !
 
 deleteChangesFrom:start to:stop
@@ -1935,4 +1932,4 @@
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.55 1995-12-03 18:11:54 cg Exp $'! !
+^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.56 1995-12-03 18:45:01 cg Exp $'! !