equal
deleted
inserted
replaced
2613 listOfSpecViews := Array new:(self class slices size). |
2613 listOfSpecViews := Array new:(self class slices size). |
2614 |
2614 |
2615 ! |
2615 ! |
2616 |
2616 |
2617 setDefaultValuesInNewColumn:aDataSetColumnSpec |
2617 setDefaultValuesInNewColumn:aDataSetColumnSpec |
2618 aDataSetColumnSpec readSelector: #'valueAtColumnIndex:'. |
2618 "/ aDataSetColumnSpec readSelector: #'valueAtColumnIndex:'. |
2619 aDataSetColumnSpec writeSelector: #'valueAtColumnIndex:put:'. |
2619 "/ aDataSetColumnSpec writeSelector: #'valueAtColumnIndex:put:'. |
2620 aDataSetColumnSpec backgroundSelector: #'bgAtRowIndex:columnIndex:'. |
2620 "/ aDataSetColumnSpec backgroundSelector: #'bgAtRowIndex:columnIndex:'. |
2621 aDataSetColumnSpec foregroundSelector: #'fgAtRowIndex:columnIndex:'. |
2621 "/ aDataSetColumnSpec foregroundSelector: #'fgAtRowIndex:columnIndex:'. |
2622 aDataSetColumnSpec selectSelector: #'selectAtColumnIndex:'. |
2622 "/ aDataSetColumnSpec selectSelector: #'selectAtColumnIndex:'. |
2623 aDataSetColumnSpec editorType: #InputField. |
2623 "/ aDataSetColumnSpec editorType: #InputField. |
2624 ! ! |
2624 ! ! |
2625 |
2625 |
2626 !DataSetBuilder methodsFor:'private'! |
2626 !DataSetBuilder methodsFor:'private'! |
2627 |
2627 |
2628 askForListModification |
2628 askForListModification |