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=3d95f708f3791786019a008fc4b98744aa398e6b;hpb=164fa32f125324078dbf45342d5e2a363a04ef1c 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