# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1040312473 -3600
# Node ID ba0469b42c99bfea5175a22152dd91cb51fd1b2b
# Parent  a7fedd485b7333014edabdd584dc665de08a51c4
dialog string

diff -r a7fedd485b73 -r ba0469b42c99 FileOperation.st
--- a/FileOperation.st	Thu Dec 19 14:59:58 2002 +0100
+++ b/FileOperation.st	Thu Dec 19 16:41:13 2002 +0100
@@ -205,7 +205,7 @@
 !FileOperation::Copy class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.12 2002-11-18 11:37:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.13 2002-12-19 15:41:13 cg Exp $'
 ! !
 
 !FileOperation::Copy methodsFor:'accessing'!
@@ -409,7 +409,7 @@
 !FileOperation::Create class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.12 2002-11-18 11:37:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.13 2002-12-19 15:41:13 cg Exp $'
 ! !
 
 !FileOperation::Create methodsFor:'accessing'!
@@ -645,7 +645,7 @@
 !FileOperation::Delete class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.12 2002-11-18 11:37:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.13 2002-12-19 15:41:13 cg Exp $'
 ! !
 
 !FileOperation::Delete methodsFor:'actions'!
@@ -694,7 +694,7 @@
                 values := #(#yes #no #yesToAll #cancel).
             ].
             retVal := Dialog 
-                confirmWithCancel:('Really Delete ', filename asString allBold, ' ?')
+                confirmWithCancel:('Really delete %1 ?' bindWith:filename asString allBold)
                            labels:labels
                            values:values
                           default:1.
@@ -784,7 +784,7 @@
 !FileOperation::Move class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.12 2002-11-18 11:37:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.13 2002-12-19 15:41:13 cg Exp $'
 ! !
 
 !FileOperation::Move methodsFor:'accessing'!
@@ -953,7 +953,7 @@
 !FileOperation::Rename class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.12 2002-11-18 11:37:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.13 2002-12-19 15:41:13 cg Exp $'
 ! !
 
 !FileOperation::Rename methodsFor:'accessing'!
@@ -1038,5 +1038,5 @@
 !FileOperation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.12 2002-11-18 11:37:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.13 2002-12-19 15:41:13 cg Exp $'
 ! !