enable commit buttons
authortz
Thu, 05 Feb 1998 21:59:12 +0100
changeset 600 82bca69d8d37
parent 599 bfac1ab2fd62
child 601 89366181efd9
enable commit buttons
DataSetBuilder.st
--- a/DataSetBuilder.st	Thu Feb 05 20:57:39 1998 +0100
+++ b/DataSetBuilder.st	Thu Feb 05 21:59:12 1998 +0100
@@ -1555,12 +1555,9 @@
 update:something with:aParameter from:someObject
     "one of my aspects has changed; update modified channel"
 
-    hasChanged
-    ifFalse:
-    [
-        self valueOfEnablingCommitButtons value: true.
-        self columnIsNotEditing value: false
-    ]
+    self valueOfEnablingCommitButtons value: true.
+    self columnIsNotEditing value: false
+
 ! !
 
 !DataSetBuilder methodsFor:'code generation'!
@@ -1926,7 +1923,7 @@
     ] 
     ifFalse:
     [
-        aspects keysAndValuesDo:[:aKey :aModel|aModel value:(column perform:aKey)].
+        aspects keysAndValuesDo:[:aKey :aModel|aModel value:(column perform:aKey) withoutNotifying: self].
         tabSelectionIndex == 0 ifTrue:[self tabModel value:1]
     ]
 ! !