X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=chiark-tcl-applet.git;a=blobdiff_plain;f=example;h=0321c6babae35b53ff2af8b6d7d7a17cdd6e46c2;hp=a22ab0bc840914b1f2720180c19111418b390e83;hb=81dfaea18e9a861fda1949e0ebf88d5c878f1b10;hpb=213cbca6ba6d566edbd8bb78d56bbdb6a3950a63 diff --git a/example b/example index a22ab0b..0321c6b 100755 --- a/example +++ b/example @@ -21,8 +21,8 @@ foreach b {1 3} { applet::setup-tooltip { puts VIS } { puts INVIS } applet::tooltip-set "line\nanother" -proc cmdline {id} { +proc cmdline {id orientation} { return [list xacpi-simple -into $id] } -applet::setup-subproc 40 darkblue 1 cmdline +applet::setup-subproc 40 40 horizontal darkblue 1 cmdline