chiark
/
gitweb
/
~ian
/
chiark-tcl-applet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
orientation
[chiark-tcl-applet.git]
/
example
diff --git
a/example
b/example
index a22ab0bc840914b1f2720180c19111418b390e83..0321c6babae35b53ff2af8b6d7d7a17cdd6e46c2 100755
(executable)
--- a/
example
+++ b/
example
@@
-21,8
+21,8
@@
foreach b {1 3} {
applet::setup-tooltip { puts VIS } { puts INVIS }
applet::tooltip-set "line\nanother"
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]
}
return [list xacpi-simple -into $id]
}
-applet::setup-subproc 40 darkblue 1 cmdline
+applet::setup-subproc 40
40 horizontal
darkblue 1 cmdline