DSVColumnView.st
changeset 2593 24ddc48c5ad4
parent 2592 ab64fbe4fb1e
child 2636 103067a67ff9
--- a/DSVColumnView.st	Wed Dec 17 12:37:24 2003 +0100
+++ b/DSVColumnView.st	Wed Dec 17 13:30:08 2003 +0100
@@ -1840,10 +1840,8 @@
     |y h |
 
     aLabel notNil ifTrue:[
-        y := yTop.
-
         aLabel isString ifTrue:[
-            y := y + (aLabel ascentOn:self).
+            y := yTop + self rowFontAscent.
         ] ifFalse:[
             h := aLabel heightOn:self.
 
@@ -1858,7 +1856,7 @@
                 ].
                 self class stopRedrawSignal raiseRequest.
             ].
-            y := y + self rowFontAscent.
+            y := yTop + (aLabel ascentOn:self).
         ].
         aLabel displayOn:self x:xLeft y:y.
     ].
@@ -3951,5 +3949,5 @@
 !DSVColumnView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.176 2003-12-17 11:37:13 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.177 2003-12-17 12:30:08 ca Exp $'
 ! !