--- a/ListView.st	Sun May 26 03:26:47 2019 +0000
+++ b/ListView.st	Sun May 26 13:11:04 2019 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -5359,6 +5357,10 @@
 
     currentMax := line size + (nTabs * 7).
     tmpString := line species new:currentMax.
+    "/ hack/kludge: Text new will not create a wide string.
+    tmpString isText ifTrue:[
+        tmpString := tmpString asStringWithBitsPerCharacterAtLeast:tmpString string bitsPerCharacter.
+    ].    
     dstIndex := 1.
     line do:[:character |
         (character == (Character tab)) ifTrue:[
@@ -5400,7 +5402,7 @@
     ^ tmpString copyTo:dstIndex
 
     "Modified: / 23-02-1996 / 19:11:01 / cg"
-    "Modified: / 08-02-2019 / 15:25:49 / Claus Gittinger"
+    "Modified (comment): / 26-05-2019 / 13:10:21 / Claus Gittinger"
 !
 
 withTabsExpanded:line