ListView.st
changeset 6451 fbed28a55482
parent 6429 5bc480285a06
child 6458 297f87a2587b
--- a/ListView.st	Fri Oct 05 09:34:12 2018 +0200
+++ b/ListView.st	Wed Oct 10 18:24:39 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -4044,12 +4042,15 @@
     "redraw part of a visible line"
 
     shown ifTrue:[
-	startCol == endCol ifTrue:[
-	    self redrawVisibleLine:visLineNr col:startCol
-	] ifFalse:[
-	    self drawVisibleLine:visLineNr from:startCol to:endCol with:fgColor and:bgColor
-	]
+        (startCol == endCol and:[startCol ~~ 0]) ifTrue:[
+            self redrawVisibleLine:visLineNr col:startCol
+        ] ifFalse:[
+            "/ if 0, the left margin needs to be drawn    
+            self drawVisibleLine:visLineNr from:startCol to:endCol with:fgColor and:bgColor
+        ]
     ]
+
+    "Modified: / 10-10-2018 / 18:23:37 / Claus Gittinger"
 ! !
 
 !ListView methodsFor:'scrolling'!