TriggerValue.st
changeset 3383 a1373c0b1b83
parent 1008 e0a54f96e34f
--- a/TriggerValue.st	Mon Nov 10 23:25:12 2014 +0100
+++ b/TriggerValue.st	Fri Nov 14 12:40:20 2014 +0100
@@ -9,6 +9,7 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
+"{ Package: 'stx:libview2' }"
 
 ValueHolder subclass:#TriggerValue
 	instanceVariableNames:''
@@ -49,6 +50,16 @@
 
 examples 
 "
+                                                                        [exBegin]
+        |trigger|
+
+        trigger := TriggerValue new.
+        trigger onChangeEvaluate:[ Transcript showCR:'hello' ].
+        trigger value:true.
+        Delay waitForSeconds:1.
+        trigger value:true
+                                                                        [exEnd]
+
     buffered editing with a TriggerValue
                                                                         [exBegin]
         |firstName lastName trigger dialog|
@@ -97,5 +108,6 @@
 !TriggerValue class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/TriggerValue.st,v 1.10 1998-07-28 09:54:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/TriggerValue.st,v 1.11 2014-11-14 11:40:20 cg Exp $'
 ! !
+