equal
deleted
inserted
replaced
1553 !DataSetBuilder methodsFor:'change & update'! |
1553 !DataSetBuilder methodsFor:'change & update'! |
1554 |
1554 |
1555 update:something with:aParameter from:someObject |
1555 update:something with:aParameter from:someObject |
1556 "one of my aspects has changed; update modified channel" |
1556 "one of my aspects has changed; update modified channel" |
1557 |
1557 |
1558 hasChanged |
1558 self valueOfEnablingCommitButtons value: true. |
1559 ifFalse: |
1559 self columnIsNotEditing value: false |
1560 [ |
1560 |
1561 self valueOfEnablingCommitButtons value: true. |
|
1562 self columnIsNotEditing value: false |
|
1563 ] |
|
1564 ! ! |
1561 ! ! |
1565 |
1562 |
1566 !DataSetBuilder methodsFor:'code generation'! |
1563 !DataSetBuilder methodsFor:'code generation'! |
1567 |
1564 |
1568 compile:aCode forClass:aClass inCategory:aCategory |
1565 compile:aCode forClass:aClass inCategory:aCategory |
1924 [ |
1921 [ |
1925 self tabModel value:0. |
1922 self tabModel value:0. |
1926 ] |
1923 ] |
1927 ifFalse: |
1924 ifFalse: |
1928 [ |
1925 [ |
1929 aspects keysAndValuesDo:[:aKey :aModel|aModel value:(column perform:aKey)]. |
1926 aspects keysAndValuesDo:[:aKey :aModel|aModel value:(column perform:aKey) withoutNotifying: self]. |
1930 tabSelectionIndex == 0 ifTrue:[self tabModel value:1] |
1927 tabSelectionIndex == 0 ifTrue:[self tabModel value:1] |
1931 ] |
1928 ] |
1932 ! ! |
1929 ! ! |
1933 |
1930 |
1934 !DataSetBuilder methodsFor:'queries'! |
1931 !DataSetBuilder methodsFor:'queries'! |