--- a/DSVColumnView.st	Thu Sep 09 18:06:27 1999 +0200
+++ b/DSVColumnView.st	Sat Sep 11 10:16:02 1999 +0200
@@ -2551,12 +2551,14 @@
         ^ preferredExtent
     ].
     x := 3.
-    h := font height.
+    h := 0.
 
     columnDescriptors do:[:aCol|
         h := (aCol heightOfHighestRow) max:h.
         x := x + (aCol minWidth).
     ].
+    h == 0 ifTrue:[h := font height].
+
     rowHeight       := (h + separatorSize + verticalSpacing + verticalSpacing + 1) // 2 * 2.
     preferredExtent := x @ (list size * rowHeight).
     rowFontAscent   := font ascent.
@@ -3231,5 +3233,5 @@
 !DSVColumnView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.89 1999-09-08 06:45:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.90 1999-09-11 08:16:02 cg Exp $'
 ! !