bugfix: if label is a sequence of strings, the row name
is the first entry into the list
--- a/DataSetBuilder.st Wed Apr 10 12:50:03 2002 +0200
+++ b/DataSetBuilder.st Fri Apr 19 18:26:14 2002 +0200
@@ -2587,9 +2587,20 @@
!
labelFromColumn:aColumn
-
- ^ aColumn rendererType == #rowSelector ifFalse:[aColumn label]
- ifTrue: ['Row Selector'].
+ |label|
+
+ aColumn rendererType == #rowSelector ifTrue:[
+ ^ 'Row Selector'
+ ].
+ label := aColumn label.
+ label ifNil:[^ nil].
+
+ label isString ifTrue:[^ label].
+
+ label size > 0 ifTrue:[
+ label := label at:1.
+ ].
+ ^ label printString
!
labelInPreviewPressed:anIndex