BufferedValueHolder.st
changeset 731 15eb4ab07b95
parent 268 1998023f12dc
child 773 b6337f784d05
--- a/BufferedValueHolder.st	Sun Nov 02 17:53:52 1997 +0100
+++ b/BufferedValueHolder.st	Sun Nov 02 18:09:15 1997 +0100
@@ -47,6 +47,9 @@
         If you encounter any incompatibilities, please forward a note 
         describing the incompatibility verbal (i.e. no code) to the ST/X team.
 
+    [see also:]
+        CodingExamples_GUI::BufferedValueHolderDemo
+
     [author:]
         Claus Gittinger
 "
@@ -171,27 +174,31 @@
 
 update:something with:aParameter from:changedObject
     changedObject == triggerChannel ifTrue:[
-	triggerChannel value == true ifTrue:[
-	    "
-	     now, store the buffered value into the subject
-	    "
-	    subject value:bufferedValue.
-	    ^ self
-	].
-	triggerChannel value == false ifTrue:[
-	    "
-	     cancel: flush my buffered value
-	    "
-	    bufferedValue := NotYetAssigned.
-	].
-	self notifyChange:#value. 
-	^ self
+        triggerChannel value == true ifTrue:[
+            "
+             now, store the buffered value into the subject
+            "
+            subject value:bufferedValue.
+            ^ self
+        ].
+        triggerChannel value == false ifTrue:[
+            "
+             cancel: flush my buffered value
+            "
+            bufferedValue := NotYetAssigned.
+        ].
+        self changed:#value.
+        "/ self notifyChange:#value. 
+        ^ self
     ].
     changedObject == subject ifTrue:[
-	bufferedValue := NotYetAssigned.
-	self notifyChange:#value.
-	^ self
+        bufferedValue := NotYetAssigned.
+        self changed:#value.
+        "/ self notifyChange:#value.
+        ^ self
     ].
+
+    "Modified: / 30.10.1997 / 05:01:30 / cg"
 ! !
 
 !BufferedValueHolder methodsFor:'initialization'!
@@ -204,5 +211,5 @@
 !BufferedValueHolder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/BufferedValueHolder.st,v 1.11 1996-05-18 15:37:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/BufferedValueHolder.st,v 1.12 1997-11-02 17:09:15 cg Exp $'
 ! !