recompute column height done in DSVLabelView now
authorca
Thu, 16 Oct 1997 15:19:33 +0200
changeset 564 fa7bb887b4fa
parent 563 826871ce82c9
child 565 3e5a63d29d36
recompute column height done in DSVLabelView now
DataSetView.st
--- a/DataSetView.st	Thu Oct 16 15:19:03 1997 +0200
+++ b/DataSetView.st	Thu Oct 16 15:19:33 1997 +0200
@@ -250,26 +250,6 @@
 
 !DataSetView methodsFor:'accessing'!
 
-columnDescriptors:colDesc
-    "compute height of baseline
-    "
-    |h label|
-
-    columnView columnDescriptors:colDesc.
-    h := 0.
-
-    columnView numberOfColumns ~~ 0 ifTrue:[
-        columnView columnsDo:[:aCol|
-            (label := aCol label) notNil ifTrue:[
-                h := (label heightOn:self) max:h
-            ]
-        ]
-    ].
-    h := h + 8.
-    labelView            corner:( 1.0 @ h ).
-    columnView superView origin:( 0.0 @ h ).
-!
-
 useIndex
     ^ useIndex
 !
@@ -427,7 +407,7 @@
         "/ listHolder and model could be the same
 
         chgObj == listHolder ifTrue:[
-            what == #at ifTrue:[
+            what == #at: ifTrue:[
                 columnView at:aPara put:(listHolder at:aPara)
             ] ifFalse:[
                 self perform:what with:aPara
@@ -581,5 +561,5 @@
 !DataSetView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DataSetView.st,v 1.1 1997-10-10 13:38:51 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DataSetView.st,v 1.2 1997-10-16 13:19:33 ca Exp $'
 ! !