EditTextView.st
changeset 5082 57b4941c5788
parent 5068 3ad3eb432172
child 5104 cd7f06c1108b
--- a/EditTextView.st	Tue Jul 01 12:57:27 2014 +0200
+++ b/EditTextView.st	Wed Jul 02 12:48:38 2014 +0200
@@ -6533,7 +6533,10 @@
     fn exists ifFalse:[
         fn := fileNameString withoutSeparators withoutQuotes asFilename.
         fn exists ifFalse:[
-            ^ self warn:'Oops - file is gone'.
+            ^ self warn:(resources 
+                            string:'Sorry - file "%1" was not found in directory "%2"' 
+                            with:fn baseName allBold
+                            with:fn directory baseName allBold).
         ].
     ].
     UserPreferences fileBrowserClass openOn:fn
@@ -8628,10 +8631,10 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.612 2014-06-18 16:55:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.613 2014-07-02 10:48:38 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.612 2014-06-18 16:55:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.613 2014-07-02 10:48:38 cg Exp $'
 ! !