FileOperation.st
changeset 13738 07e534de96bd
parent 13703 43a4a2599e17
child 14187 fe7fa2d23b0b
--- a/FileOperation.st	Sun Jan 05 14:17:36 2014 +0100
+++ b/FileOperation.st	Sun Jan 05 14:20:00 2014 +0100
@@ -921,9 +921,9 @@
     box label:'Create Link'.
 
     string := 'Create ', (symbolic ifTrue:['Symbolic'] ifFalse:['Hard']) ,' Link from:'.
-    (box addTextLabel:(resources string:string)) adjust:#left.
+    box addTextLabel:(resources string:string) adjust:#left.
     if1 := box addFilenameInputFieldOn:oldPath in:nil tabable:true.
-    (box addTextLabel:(resources string:'to:')) adjust:#left.
+    box addTextLabel:(resources string:'to:') adjust:#left.
     if2 := box addFilenameInputFieldOn:newPath in:nil value tabable:true.
 
     box addAbortAndOkButtons.
@@ -1604,10 +1604,10 @@
 !FileOperation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.93 2013-12-04 14:23:14 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.94 2014-01-05 13:20:00 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.93 2013-12-04 14:23:14 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.94 2014-01-05 13:20:00 cg Exp $'
 ! !