#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Thu, 30 Nov 2017 14:53:24 +0100
changeset 17826 4e675d08c5cc
parent 17825 83273b82d3a3
child 17827 cc7a2ad961f7
#REFACTORING by cg class: FileOperation::Create changed: #createLinkIn:soft:
FileOperation.st
--- a/FileOperation.st	Thu Nov 30 14:51:26 2017 +0100
+++ b/FileOperation.st	Thu Nov 30 14:53:24 2017 +0100
@@ -1029,9 +1029,9 @@
     oldPath := aFile asValue.
 
     box := Dialog new.
-    box label:'Create Link'.
+    box label:(resources string:'Create Link').
 
-    string := 'Create ', (symbolic ifTrue:['Symbolic'] ifFalse:['Hard']) ,' Link from:'.
+    string := 'Create %1 Link from:' bindWith:(symbolic ifTrue:['Symbolic'] ifFalse:['Hard']).
     box addTextLabel:(resources string:string) adjust:#left.
     if1 := box addFilenameInputFieldOn:oldPath in:nil tabable:true.
     box addTextLabel:(resources string:'to:') adjust:#left.
@@ -1051,7 +1051,7 @@
     
     self doCreateLinkFrom:(oldPath value) to:(newPath value) soft:symbolic.
 
-    "Modified: / 30-11-2017 / 14:24:54 / cg"
+    "Modified: / 30-11-2017 / 14:53:13 / cg"
 !
 
 doCreateLinkFrom:oldPath to:newPathArg soft:symbolic