author | tz |
Mon, 02 Feb 1998 20:19:04 +0100 | |
changeset 554 | 34ceed6455fa |
parent 553 | adccf76bd9bb |
child 555 | 54dbb4838d23 |
DataSetBuilder.st | file | annotate | diff | comparison | revisions |
--- a/DataSetBuilder.st Mon Feb 02 20:18:09 1998 +0100 +++ b/DataSetBuilder.st Mon Feb 02 20:19:04 1998 +0100 @@ -2039,7 +2039,7 @@ |label list| list := self seqList. - label := 'Column ', list size printString. + label := 'Column ', (list size + 1) printString. columns add:(DataSetColumnSpec label:label selector:nil) afterIndex:selectedColumnIndex. self seqList add:label afterIndex:selectedColumnIndex. hasChanged := true.