--- 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 $'
! !
+