--- a/ListView.st	Tue Sep 13 15:49:35 2016 +0200
+++ b/ListView.st	Tue Sep 13 15:58:03 2016 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -3169,7 +3167,7 @@
 
     |w|
 
-    (w := self widthOfLine:aLine) > widthOfWidestLine ifTrue:[
+    (w := self widthOfLineString:aLine) > widthOfWidestLine ifTrue:[
         widthOfWidestLine := w.
         self contentsChanged.
     ].    
@@ -3770,12 +3768,8 @@
     list isNil ifTrue:[^ 0].
     lineNr > list size ifTrue:[^ 0].
     line := list at:lineNr.
-    list isNil ifTrue:[^ 0].
-
-    (line isSingleByteString) ifTrue:[
-        ^ gc deviceFont widthOf:line
-    ].
-    ^ line widthOn:self
+    line isNil ifTrue:[^ 0].
+    ^ self widthOfLineString:line
 
     "Created: / 10.11.1998 / 23:59:20 / cg"
     "Modified: / 11.11.1998 / 15:25:07 / cg"