TextView.st
changeset 1359 d1d0c157a85f
parent 1353 5dac6aa6ac96
child 1380 1794c90633f9
--- a/TextView.st	Wed Oct 22 15:30:43 1997 +0200
+++ b/TextView.st	Thu Oct 23 16:50:19 1997 +0200
@@ -10,7 +10,7 @@
  hereby transferred.
 "
 
-'From Smalltalk/X, Version:3.2.1 on 20-oct-1997 at 2:11:29 pm'                  !
+'From Smalltalk/X, Version:3.2.1 on 23-oct-1997 at 2:48:24 pm'                  !
 
 ListView subclass:#TextView
 	instanceVariableNames:'selectionStartLine selectionStartCol selectionEndLine
@@ -1280,7 +1280,7 @@
             aStream := FileStream newFileNamed:fileName.
         ].
         aStream isNil ifTrue:[
-            msg := resources string:'cannot write file %1 !!' with:fileName.
+            msg := resources string:'cannot write file ''%1'' !!' with:fileName.
             self warn:(msg , '\\(' , FileStream lastErrorString , ')' ) withCRs
         ] ifFalse:[
             self
@@ -1292,7 +1292,7 @@
         ]
     ]
 
-    "Modified: 13.10.1997 / 12:22:39 / cg"
+    "Modified: 22.10.1997 / 12:32:51 / cg"
 !
 
 search
@@ -2807,5 +2807,5 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.109 1997-10-21 18:03:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.110 1997-10-23 14:50:19 cg Exp $'
 ! !