smaller header height
authortz
Sat, 07 Feb 1998 17:40:26 +0100
changeset 745 4070ba345f45
parent 744 5cfa9e8f2f3e
child 746 bd252bbe276f
smaller header height
DataSetView.st
--- a/DataSetView.st	Sat Feb 07 17:01:49 1998 +0100
+++ b/DataSetView.st	Sat Feb 07 17:40:26 1998 +0100
@@ -561,7 +561,7 @@
             (prv isNil and:[aCol label notNil]) ifTrue:[prv := aCol]
         ]
     ].
-    hgt := hgt + 10.
+    hgt := hgt + (hgt // 5).
 
     scrolledView topInset:hgt.
     labelView bottomInset:(hgt negated).
@@ -824,5 +824,5 @@
 !DataSetView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DataSetView.st,v 1.14 1998-02-02 14:13:41 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DataSetView.st,v 1.15 1998-02-07 16:40:26 tz Exp $'
 ! !