UISpecificationTool.st
changeset 1071 560a9eb1a5d8
parent 1069 7196ca547f5d
child 1082 e0aa632c4016
--- a/UISpecificationTool.st	Sat Mar 20 02:28:24 1999 +0100
+++ b/UISpecificationTool.st	Sat Mar 20 16:23:19 1999 +0100
@@ -616,6 +616,7 @@
 modifiedHolder:aValueHolder
     "set the value holder set to true in case of modifying attributes
     "
+
     modifiedHolder notNil ifTrue:[
         modifiedHolder removeDependent:self. 
     ].
@@ -718,9 +719,7 @@
         "/ any in the spec has changed.
         "/ update my modified holders value
 
-        modifiedHolder value ~~ true ifTrue:[
-            modifiedHolder value:true
-        ]
+        modifiedHolder value:true
     ]
 
     "Modified: / 16.7.1998 / 19:25:59 / cg"