--- a/DataSetView.st Mon Jan 12 14:49:19 1998 +0100
+++ b/DataSetView.st Mon Jan 12 23:54:39 1998 +0100
@@ -535,7 +535,7 @@
prv := nil.
lst := columnView lastColumn.
- columnView columnsDo:[:aCol|
+ columnView columnsDo:[:aCol||l|
(aCol showColSeparator or:[aCol == lst]) ifTrue:[
lbl := DSVLabelView column:(prv ? aCol) in:self.
prv := nil.
@@ -623,7 +623,14 @@
|x0 x1 pt dX y id lst|
labels size == columnView numberOfColumns ifFalse:[
- ^ self recomputeLabels
+ id := columnView lastColumn showColSeparator ifTrue:[0] ifFalse:[1].
+
+ columnView columnsDo:[:aCol|
+ aCol showColSeparator ifTrue:[id := id + 1]
+ ].
+ labels size ~~ id ifTrue:[
+ ^ self recomputeLabels
+ ].
].
labels size == 0 ifTrue:[ ^ self ].
@@ -799,5 +806,5 @@
!DataSetView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/DataSetView.st,v 1.10 1998-01-12 10:17:54 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/DataSetView.st,v 1.11 1998-01-12 22:54:39 ca Exp $'
! !