--- 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 $'
! !