# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1511893200 -3600
# Node ID 3408e9d75b99e6e6b07b2338dc59268f7d3c7b88
# Parent  274bc7170ace6dafa541529b297162f663f72464
#DOCUMENTATION by cg
class: BufferedValueHolder
category of: #triggerChannel:

diff -r 274bc7170ace -r 3408e9d75b99 BufferedValueHolder.st
--- a/BufferedValueHolder.st	Tue Nov 28 19:19:53 2017 +0100
+++ b/BufferedValueHolder.st	Tue Nov 28 19:20:00 2017 +0100
@@ -9,6 +9,9 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
+"{ Package: 'stx:libview2' }"
+
+"{ NameSpace: Smalltalk }"
 
 ValueHolder subclass:#BufferedValueHolder
 	instanceVariableNames:'subject triggerChannel bufferedValue'
@@ -151,6 +154,17 @@
     ]
 !
 
+value
+    "return my value"
+
+    bufferedValue == NotYetAssigned ifTrue:[
+	bufferedValue := subject value
+    ].
+    ^ bufferedValue
+! !
+
+!BufferedValueHolder methodsFor:'accessing-channels'!
+
 triggerChannel:aTrigger
     triggerChannel notNil ifTrue:[
 	triggerChannel removeDependent:self
@@ -159,15 +173,6 @@
     triggerChannel notNil ifTrue:[
 	triggerChannel addDependent:self
     ]
-!
-
-value
-    "return my value"
-
-    bufferedValue == NotYetAssigned ifTrue:[
-	bufferedValue := subject value
-    ].
-    ^ bufferedValue
 ! !
 
 !BufferedValueHolder methodsFor:'change & update'!
@@ -225,5 +230,6 @@
 !BufferedValueHolder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/BufferedValueHolder.st,v 1.14 1998-07-28 09:54:55 cg Exp $'
+    ^ '$Header$'
 ! !
+