--- a/UIHelpTool.st	Mon Jul 13 19:07:12 1998 +0200
+++ b/UIHelpTool.st	Thu Jul 16 21:11:20 1998 +0200
@@ -539,6 +539,8 @@
 modifiedHolder:aValueHolder
     "sets the value holder to true in case of modifying attributes"
 
+    |eTxtView modChannel|
+
     modifiedHolder notNil ifTrue:[
         modifiedHolder removeDependent:self. 
     ].
@@ -546,10 +548,11 @@
     (modifiedHolder := aValueHolder) notNil ifTrue:[
         modifiedHolder addDependent:self.
 
-        self editTextView notNil ifTrue: [
-            self editTextView modifiedChannel onChangeSend:#value to:[
+        (eTxtView := self editTextView) notNil ifTrue: [
+            modChannel := eTxtView modifiedChannel.
+            modChannel onChangeSend:#value to:[
                 modifiedHolder notNil ifTrue:[
-                    self editTextView modifiedChannel value ifTrue:[
+                    modChannel value ifTrue:[
                         modifiedHolder value:true
                     ]
                 ]
@@ -557,7 +560,7 @@
         ]
     ]
 
-
+    "Modified: / 16.7.1998 / 18:12:09 / cg"
 !
 
 specClass