--- a/FileOperation.st	Thu Feb 20 17:32:16 2003 +0100
+++ b/FileOperation.st	Thu Feb 20 17:52:25 2003 +0100
@@ -205,7 +205,7 @@
 !FileOperation::Copy class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.19 2003-02-03 20:20:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.20 2003-02-20 16:52:25 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.19 2003-02-03 20:20:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.20 2003-02-20 16:52:25 cg Exp $'
 ! !
 
 !FileOperation::Create methodsFor:'accessing'!
@@ -654,7 +654,7 @@
 !FileOperation::Delete class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.19 2003-02-03 20:20:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.20 2003-02-20 16:52:25 cg Exp $'
 ! !
 
 !FileOperation::Delete methodsFor:'actions'!
@@ -704,15 +704,15 @@
         ].
         ask ifTrue:[
             size = 1 ifTrue:[
-                labels := #('Yes' 'No' 'Cancel').
-                values := #(#yes #no #cancel).
+                labels := #('Cancel' 'No' 'Yes').
+                values := #(#cancel #no #yes).
             ] ifFalse:[
-                labels := #('Yes' 'No' 'Yes to All' 'Cancel').
-                values := #(#yes #no #yesToAll #cancel).
+                labels := #('Cancel' 'No' 'Yes' 'Yes to All' ).
+                values := #(#cancel #no #yes #yesToAll).
             ].
             retVal := Dialog 
-                confirmWithCancel:('Really delete %1 ?' bindWith:filename asString allBold)
-                           labels:labels
+                confirmWithCancel:(FileBrowser classResources string:'Really delete %1 ?' with:(filename asString allBold))
+                           labels:(FileBrowser classResources array:labels)
                            values:values
                           default:1.
         ].
@@ -818,7 +818,7 @@
 !FileOperation::Move class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.19 2003-02-03 20:20:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.20 2003-02-20 16:52:25 cg Exp $'
 ! !
 
 !FileOperation::Move methodsFor:'accessing'!
@@ -988,7 +988,7 @@
 !FileOperation::Rename class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.19 2003-02-03 20:20:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.20 2003-02-20 16:52:25 cg Exp $'
 ! !
 
 !FileOperation::Rename methodsFor:'accessing'!
@@ -1046,14 +1046,14 @@
     |queryBox b lastNewName lastOldName initialText oldName|
 
     queryBox := FilenameEnterBox new.
-    queryBox okText:'Rename'.
+    queryBox okText:(FileBrowser classResources string:'Rename').
     aColOfFiles size > 1 ifTrue:[
-        b := queryBox addAbortButtonLabelled:'Cancel All'.
+        b := queryBox addAbortButtonLabelled:(FileBrowser classResources string:'Cancel All').
         b action:[^ self]
     ].
     aColOfFiles do:[:oldFile | 
         oldName := oldFile baseName asString.
-        queryBox title:('Rename %1 to:' bindWith:oldName allBold).
+        queryBox title:(FileBrowser classResources string:'Rename %1 to:' with:(oldName allBold)).
         lastNewName notNil ifTrue:[
             initialText := FileBrowser goodRenameDefaultForFile:oldName lastOld:lastOldName lastNew:lastNewName
         ].
@@ -1073,5 +1073,5 @@
 !FileOperation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.19 2003-02-03 20:20:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.20 2003-02-20 16:52:25 cg Exp $'
 ! !