ListView.st
changeset 6293 c7b0b569926d
parent 6281 5b9029e14c9e
child 6304 93a632d04f8c
--- a/ListView.st	Fri Mar 09 00:59:36 2018 +0100
+++ b/ListView.st	Mon Mar 12 15:42:00 2018 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -3176,41 +3174,41 @@
     |newW oldW|
 
     widthOfWidestLine notNil ifTrue:[
-	newEntry isNil ifTrue:[
-	    newW := 0
-	] ifFalse:[
-	    (newEntry isSingleByteString) ifTrue:[
-		newW := gc font widthOf:newEntry
-	    ] ifFalse:[
-		newW := newEntry widthOn:self
-	    ].
-	].
-
-	newW >= widthOfWidestLine ifTrue:[
-	    widthOfWidestLine := newW.
-	] ifFalse:[
-	    oldEntry isNil ifTrue:[
-		oldW := 0
-	    ] ifFalse:[
-		(oldEntry isSingleByteString) ifTrue:[
-		    oldW := gc font widthOf:oldEntry
-		] ifFalse:[
-		    oldW := oldEntry widthOn:self
-		].
-	    ].
-	    newW > oldW ifTrue:[
-		"/ no change; new entries width is between this width and amx width
-	    ] ifFalse:[
-		"/ new entry is smaller than oldEntry; if the oldEntry was the previos max,
-		"/ we don't know the new max
-		oldW = widthOfWidestLine ifTrue:[
-		    widthOfWidestLine := nil "/ means: unknown
-		] ifFalse:[
-		    "/ old line was not the widest, and new line is shorter;
-		    "/ no change
-		]
-	    ]
-	].
+        newEntry isNil ifTrue:[
+            newW := 0
+        ] ifFalse:[
+            (newEntry isSingleByteString) ifTrue:[
+                newW := gc font widthOf:newEntry
+            ] ifFalse:[
+                newW := newEntry widthOn:self
+            ].
+        ].
+
+        newW >= widthOfWidestLine ifTrue:[
+            widthOfWidestLine := newW.
+        ] ifFalse:[
+            oldEntry isNil ifTrue:[
+                oldW := 0
+            ] ifFalse:[
+                (oldEntry isSingleByteString) ifTrue:[
+                    oldW := gc font widthOf:oldEntry
+                ] ifFalse:[
+                    oldW := oldEntry widthOn:self
+                ].
+            ].
+            newW > oldW ifTrue:[
+                "/ no change; new entries width is between this width and amx width
+            ] ifFalse:[
+                "/ new entry is smaller than oldEntry; if the oldEntry was the previous max,
+                "/ we don't know the new max
+                oldW = widthOfWidestLine ifTrue:[
+                    widthOfWidestLine := nil "/ means: unknown
+                ] ifFalse:[
+                    "/ old line was not the widest, and new line is shorter;
+                    "/ no change
+                ]
+            ]
+        ].
     ].
     ^ widthOfWidestLine
 !