--- a/TextView.st	Fri Feb 20 13:44:32 2004 +0100
+++ b/TextView.st	Fri Feb 20 16:14:05 2004 +0100
@@ -1609,7 +1609,6 @@
     self initializeSaveAction.
     contentsWasSaved := false.
     dragIsActive     := false.
-    characterEncoding := #'iso8859-1'.
 
     parenthesisSpecification isNil ifTrue:[
         parenthesisSpecification := DefaultParenthesisSpecification.
@@ -3785,7 +3784,7 @@
 
     selectionStartLine isNil ifTrue:[^ nil].
     sel := self textFromLine:selectionStartLine col:selectionStartCol toLine:selectionEndLine col:selectionEndCol.
-    characterEncoding ~~ #'iso8859-1' ifTrue:[
+    (characterEncoding ? #'unicode') ~~ #'unicode' ifTrue:[
         sel := sel encodeFrom:characterEncoding into:#'unicode'
     ].
     ^ sel
@@ -3880,7 +3879,7 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.236 2004-02-20 10:38:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.237 2004-02-20 15:13:55 cg Exp $'
 ! !
 
 TextView initialize!