#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Fri, 01 Jun 2018 14:12:18 +0200
changeset 18175 403729a65fe5
parent 18174 2bb8e22801bc
child 18176 96c61c107803
#REFACTORING by cg class: AbstractFileBrowser changed: #newDirectory #newFile #newLink:
AbstractFileBrowser.st
--- a/AbstractFileBrowser.st	Thu May 31 16:05:19 2018 +0200
+++ b/AbstractFileBrowser.st	Fri Jun 01 14:12:18 2018 +0200
@@ -5408,7 +5408,7 @@
 
     directory := self currentDirectory.
     directory isNil ifTrue:[
-        self warn:(resources string:'Select a single directory to create a directory').
+        self warn:'Select a single directory to create a directory' translate:true.
         ^ self
     ].
 
@@ -5441,6 +5441,7 @@
     ]
 
     "Modified: / 29-11-2017 / 12:26:41 / cg"
+    "Modified: / 01-06-2018 / 12:49:43 / Claus Gittinger"
 !
 
 newFile
@@ -5450,7 +5451,7 @@
 
     directory := self currentDirectory.
     directory isNil ifTrue:[
-        self warn:(resources string:'Select a single directory to create a file.').
+        self warn:'Select a single directory to create a file.' translate:true.
         ^ self.
     ].
 
@@ -5465,6 +5466,7 @@
     self updateAndSelect:(OrderedCollection with:(create createdFile)).
 
     "Modified: / 29-11-2017 / 12:26:51 / cg"
+    "Modified: / 01-06-2018 / 12:49:50 / Claus Gittinger"
 !
 
 newHardLink
@@ -5480,7 +5482,7 @@
 
     sel := self currentSelectedObjects.
     (sel size ~= 1) ifTrue:[
-        self warn:(resources string:'Select one directory to link').
+        self warn:'Select one directory to link' translate:true.
         ^ self
     ].
     dir := sel first.
@@ -5497,6 +5499,7 @@
     ].
 
     "Modified: / 29-11-2017 / 12:26:58 / cg"
+    "Modified: / 01-06-2018 / 12:49:32 / Claus Gittinger"
 !
 
 newSoftLink