diff -r 99ab02c595bb -r 53ad86d76a7e ListView.st
--- a/ListView.st	Thu Jun 27 22:01:43 2013 +0200
+++ b/ListView.st	Fri Jun 28 10:52:25 2013 +0200
@@ -2703,23 +2703,22 @@
 listAt:lineNr to:endCol
     "return left substring from start to endCol of a line"
 
-    |line stop lineSize|
+    |line lineSize|
 
     line := self listAt:lineNr.
     line isNil ifTrue:[
-        (stop > 0) ifTrue:[
-            ^ (String new:stop)
+        (endCol > 0) ifTrue:[
+            ^ (String new:endCol)
         ].
         ^ nil
     ].
 
     lineSize := line size.
-    stop := endCol.
-
-    (stop > lineSize) ifTrue:[
-        ^ (line copyTo:lineSize) , (String new:(stop - lineSize)).
+
+    (endCol > lineSize) ifTrue:[
+        ^ (line copyTo:lineSize) , (String new:(endCol - lineSize)).
     ].
-    ^ line copyTo:stop
+    ^ line copyTo:endCol
 !
 
 listLineIsVisible:listLineNr
@@ -4918,10 +4917,10 @@
 !ListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.370 2013-06-27 20:01:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.371 2013-06-28 08:52:25 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.370 2013-06-27 20:01:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.371 2013-06-28 08:52:25 cg Exp $'
 ! !