Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Wed, 17 Sep 1997 19:57:43 +0200
changeset 1321 3bbc90790749
parent 1320 897d86e89000
child 1322 4124a8a3d790
*** empty log message ***
CBrowser.st file | annotate | diff | comparison | revisions
ChangesBrowser.st file | annotate | diff | comparison | revisions 
--- a/CBrowser.st	Wed Sep 17 19:53:51 1997 +0200
+++ b/CBrowser.st	Wed Sep 17 19:57:43 1997 +0200
@@ -1796,7 +1796,7 @@
         ].
 
 	f := changeFileName asFilename.
-	f renameTo:(changeFileName withSuffix:'bak').
+	f renameTo:(f withSuffix:'bak').
         tempfile renameTo:changeFileName.
         anyChanges := false
     ].
@@ -2584,5 +2584,5 @@
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/CBrowser.st,v 1.117 1997-09-15 21:06:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/CBrowser.st,v 1.118 1997-09-17 17:57:43 cg Exp $'
 ! !
--- a/ChangesBrowser.st	Wed Sep 17 19:53:51 1997 +0200
+++ b/ChangesBrowser.st	Wed Sep 17 19:57:43 1997 +0200
@@ -1796,7 +1796,7 @@
         ].
 
 	f := changeFileName asFilename.
-	f renameTo:(changeFileName withSuffix:'bak').
+	f renameTo:(f withSuffix:'bak').
         tempfile renameTo:changeFileName.
         anyChanges := false
     ].
@@ -2584,5 +2584,5 @@
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.117 1997-09-15 21:06:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.118 1997-09-17 17:57:43 cg Exp $'
 ! !
hg/stx-libtool