DSVColumnView.st
changeset 1089 931865a72ba7
parent 1087 8e97cbfebe12
child 1100 376515452be4
--- a/DSVColumnView.st	Sun Aug 23 15:14:46 1998 +0200
+++ b/DSVColumnView.st	Mon Aug 24 07:23:52 1998 +0200
@@ -1341,13 +1341,20 @@
                     rW := (x1 min:maxX) - x.
 
                     self clippingRectangle:(Rectangle left:x top:y width:rW height:h).
-                    aCol redrawX:x0 y:yTop from:start to:stop with:fgColor and:bgColor.
+                    aCol redrawX:x0 y:yTop from:start to:stop.
                 ].
                 x0 := x1
             ].
             self clippingRectangle:savClip.
         ]
     ].
+!
+
+setFgBgPaintFor:aRowNr
+    (self isRowSelected:aRowNr) ifFalse:[self paint:fgColor     on:bgColor]
+                                 ifTrue:[self paint:hgLgFgColor on:hgLgBgColor].
+
+
 ! !
 
 !DSVColumnView methodsFor:'enumerating columns'!
@@ -2771,5 +2778,5 @@
 !DSVColumnView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.49 1998-08-23 13:14:03 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.50 1998-08-24 05:23:38 ca Exp $'
 ! !