equal
deleted
inserted
replaced
2227 |
2227 |
2228 buildFromResourceSpec:aResourceSpec |
2228 buildFromResourceSpec:aResourceSpec |
2229 |
2229 |
2230 self columns:aResourceSpec. |
2230 self columns:aResourceSpec. |
2231 |
2231 |
2232 columns notEmpty ifTrue: [ |
2232 "/ columns notEmpty ifTrue: [ |
2233 self tabModel value: 1. |
2233 "/ self tabModel value: 1. |
2234 self selectedColumnModel value:nil; value:1. "/ toggle to force change |
2234 "/ self selectedColumnModel value:nil; value:1. "/ toggle to force change |
2235 self updateInputFields. |
2235 "/ self updateInputFields. |
2236 self updateInfoLabel. |
2236 "/ self updateInfoLabel. |
2237 self updateHistory |
2237 "/ self updateHistory |
2238 ]. |
2238 "/ ]. |
2239 |
2239 |
2240 ! ! |
2240 ! ! |
2241 |
2241 |
2242 !DataSetBuilder methodsFor:'code generation'! |
2242 !DataSetBuilder methodsFor:'code generation'! |
2243 |
2243 |
2676 model value isNil ifTrue:[model value:'' withoutNotifying: self] |
2676 model value isNil ifTrue:[model value:'' withoutNotifying: self] |
2677 ]. |
2677 ]. |
2678 |
2678 |
2679 tabSelection == 0 ifTrue:[self tabModel value:1]. |
2679 tabSelection == 0 ifTrue:[self tabModel value:1]. |
2680 ]. |
2680 ]. |
2681 |
|
2682 ! ! |
2681 ! ! |
2683 |
2682 |
2684 !DataSetBuilder methodsFor:'selection'! |
2683 !DataSetBuilder methodsFor:'selection'! |
2685 |
2684 |
2686 selectedColumn |
2685 selectedColumn |
2758 openModalOnResourceSpec: aListSpec |
2757 openModalOnResourceSpec: aListSpec |
2759 "sets the modalOpened flag, so later, |
2758 "sets the modalOpened flag, so later, |
2760 there is no need to ask for saving into a class" |
2759 there is no need to ask for saving into a class" |
2761 |
2760 |
2762 modalOpened := true. |
2761 modalOpened := true. |
2763 |
|
2764 super openModalOnResourceSpec: aListSpec |
2762 super openModalOnResourceSpec: aListSpec |
2765 |
2763 |
2766 |
2764 |
2767 ! |
2765 ! |
2768 |
2766 |
2770 |
2768 |
2771 columnView := self builder componentAt:#columnView. |
2769 columnView := self builder componentAt:#columnView. |
2772 "/ columnView labelView enabled:false. |
2770 "/ columnView labelView enabled:false. |
2773 |
2771 |
2774 super postBuildWith:builder. |
2772 super postBuildWith:builder. |
|
2773 |
|
2774 columns notEmpty ifTrue: [ |
|
2775 self tabModel value: 1. |
|
2776 self selectedColumnModel value:nil; value:1. "/ toggle to force change |
|
2777 self updateInputFields. |
|
2778 self updateInfoLabel. |
|
2779 self updateHistory |
|
2780 ]. |
2775 |
2781 |
2776 (builder componentAt: #labelAndColumns) |
2782 (builder componentAt: #labelAndColumns) |
2777 selectConditionBlock: [:i|self askForItemModification]; |
2783 selectConditionBlock: [:i|self askForItemModification]; |
2778 action: [:i|self cancel]; |
2784 action: [:i|self cancel]; |
2779 selection: 1. |
2785 selection: 1. |
2780 |
|
2781 |
|
2782 |
|
2783 ! |
2786 ! |
2784 |
2787 |
2785 postOpenWith:aBuilder |
2788 postOpenWith:aBuilder |
2786 "reset keyboardProcessor for menuBar |
2789 "reset keyboardProcessor for menuBar |
2787 " |
2790 " |