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
example can run other programs
[chiark-tcl-applet.git]
/
example
diff --git
a/example
b/example
index 6d3eb65a9452bc9620570f290060b256c2c048a8..bd05b1787c97e1eac55a04fbd26b9e3586f40613 100755
(executable)
--- a/
example
+++ b/
example
@@
-25,7
+25,8
@@
applet::setup-tooltip { puts VIS } { puts INVIS }
applet::tooltip-set "line\nanother"
proc cmdline {id orientation} {
applet::tooltip-set "line\nanother"
proc cmdline {id orientation} {
- return [list xacpi-simple -into $id]
+ global argv
+ return [concat $argv $id]
}
applet::setup-subproc cmdline
}
applet::setup-subproc cmdline