--- 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 $'
! !