applet: Introduce applet::become

[chiark-tcl-applet.git] / example

diff --git a/example b/example
index 7cf6b15111ecee755463996772bece81ca484260..70e74cb209be02e77d4d871684a47781df29947f 100755 (executable)
--- a/example
+++ b/example
@@ -20,6 +20,8 @@ source $lib/applet.tcl
 source $lib/subproc.tcl
 source $lib/utils.tcl
 
+applet::become
+
 set debug::debug puts
 
 foreach b {1 3} {