DataSetColumn.st
changeset 644 5472db50a5eb
parent 637 e56ec99923ae
child 647 ee98a1976972
--- a/DataSetColumn.st	Sat Jan 03 18:02:59 1998 +0100
+++ b/DataSetColumn.st	Sat Jan 03 18:03:36 1998 +0100
@@ -172,7 +172,7 @@
         bg := bgColor
     ] ifFalse:[
         dataSet paint:(dataSet colorOnDevice:bg).
-        dataSet fillRectangleX:x0 y:yTop width:width height:(yBot - yTop - 1)
+        dataSet fillRectangleX:x0 y:yTop width:width  height:(yBot - yTop - 1)
     ].
     (fg := foregroundColor) notNil ifTrue:[
         lgCol := fg
@@ -256,7 +256,7 @@
         dataSet paint:fgColor.
 
         description showColSeparator ifTrue:[
-            dataSet displayLineFromX:x y:yTop toX:x y:yBot
+            dataSet displayLineFromX:x y:yTop toX:x y:yBot - 1
         ].
 
         description showRowSeparator ifTrue:[
@@ -560,5 +560,5 @@
 !DataSetColumn class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DataSetColumn.st,v 1.12 1998-01-02 15:58:59 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DataSetColumn.st,v 1.13 1998-01-03 17:03:36 ca Exp $'
 ! !