--- a/ResourceSpecEditor.st	Thu Dec 04 14:53:35 2003 +0100
+++ b/ResourceSpecEditor.st	Thu Dec 04 15:55:55 2003 +0100
@@ -261,10 +261,16 @@
 
 !ResourceSpecEditor methodsFor:'change & update'!
 
-update:something with:aParameter from:someObject
+update:something with:aParameter from:changedObject
     "one of my aspects has changed; update modified channel for the commit buttons"
 
-    self valueOfEnablingCommitButtons value: true 
+    |enableCommitButtonsHolder|
+
+    enableCommitButtonsHolder := self valueOfEnablingCommitButtons.
+
+    changedObject ~~ enableCommitButtonsHolder ifTrue:[ 
+        enableCommitButtonsHolder value: true 
+    ]
 
 !
 
@@ -349,11 +355,11 @@
 
         answer ifTrue:[
             self accept
-        ] ifFalse: [
+        ] ifFalse:[
             anythingChangedHolder value: false. 
             self clearModifiedFlag. 
             modified := false.
-        ]
+        ].
     ].
     ^true
 
@@ -686,5 +692,5 @@
 !ResourceSpecEditor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ResourceSpecEditor.st,v 1.26 2003-12-04 11:51:04 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ResourceSpecEditor.st,v 1.27 2003-12-04 14:55:55 cg Exp $'
 ! !