tooltips

[chiark-tcl-applet.git] / example

diff --git a/example b/example
index 67977a9dbcf132e829219e255447360bbbe91dca..8c5e0c921bda0c32f673221aafa18f64aa1de37b 100755 (executable)
--- a/example
+++ b/example
@@ -17,7 +17,7 @@ foreach b {1 3} {
 #setimage ims
 #setimage ims
 
 #setimage ims
 #setimage ims
 

-applet::setup-tooltip
+applet::setup-tooltip { puts VIS } { puts INVIS }

 applet::tooltip-set "line\nanother"
 
 fconfigure stdout -buffering line
 applet::tooltip-set "line\nanother"
 
 fconfigure stdout -buffering line