TextView.st
changeset 6206 f7a386aee648
parent 6205 4f25a348e0e2
child 6256 76350fb3380f
--- a/TextView.st	Fri Sep 01 14:42:21 2017 +0200
+++ b/TextView.st	Fri Sep 01 14:43:16 2017 +0200
@@ -2184,7 +2184,7 @@
     text := self selection.
     text notNil ifTrue:[
         "/ forget any emphasis ...
-        text := text collect:[:l | l isNil ifTrue:[''] ifFalse:[l string]].
+        text := text collect:[:line | line isNil ifTrue:[''] ifFalse:[line string]].
 
         startCol := selectionStartCol.
         endCol := selectionEndCol.
@@ -2202,6 +2202,7 @@
     ]
 
     "Created: / 14-03-2017 / 16:06:02 / cg"
+    "Modified (format): / 01-09-2017 / 14:43:07 / cg"
 !
 
 defaultForGotoLine