*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Mon, 14 Feb 2005 17:13:59 +0100
changeset 6185 d366b36841fd
parent 6184 bcb22487bc67
child 6186 a98af19d2f6b
*** empty log message ***
FileOperation.st
--- a/FileOperation.st	Mon Feb 14 17:13:29 2005 +0100
+++ b/FileOperation.st	Mon Feb 14 17:13:59 2005 +0100
@@ -1270,7 +1270,7 @@
             queryBox initialText:(initialText ? oldName).
             queryBox action:[:newEnteredName | newName := newEnteredName. doRename := true.].
             queryBox show "showAtPointer".
-            queryBox accepted ifFalse:[self halt].
+            "/ queryBox accepted ifFalse:[self halt].
         ].
         doRename ifTrue:[
             (self renameFile:oldFile to:newName asString) ifTrue:[
@@ -1285,5 +1285,5 @@
 !FileOperation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.64 2005-01-20 13:03:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.65 2005-02-14 16:13:59 cg Exp $'
 ! !