TextView.st
changeset 6269 49be8ecf8afa
parent 6264 3b7b675cbdf8
child 6282 bd0d311af082
--- a/TextView.st	Thu Jan 18 17:08:56 2018 +0100
+++ b/TextView.st	Fri Jan 19 12:26:14 2018 +0100
@@ -5201,14 +5201,15 @@
     sel := self textFromLine:selectionStartLine col:(selectionStartCol max:1) toLine:selectionEndLine col:selectionEndCol.
     sel notEmptyOrNil ifTrue:[
         "/ this is rubbish; we are now always using unicode internally
-        "/ any many more conversions would be needed at many places...
-        (gc characterEncoding ? #'iso10646-1' "eg unicode") ~~ #'iso10646-1' ifTrue:[
+        "/ and many more conversions would be needed at many places...
+        gc characterEncoding ~~ #'iso10646-1' ifTrue:[
             sel := sel encodeFrom:gc characterEncoding into:#'iso10646-1'
         ].
     ].
     ^ sel
 
     "Modified (comment): / 25-01-2012 / 00:29:09 / cg"
+    "Modified: / 19-01-2018 / 12:22:31 / stefan"
 !
 
 selectionAsString