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
fix option processing
[chiark-tcl-applet.git]
/
example
diff --git
a/example
b/example
index 0321c6babae35b53ff2af8b6d7d7a17cdd6e46c2..6d3eb65a9452bc9620570f290060b256c2c048a8 100755
(executable)
--- a/
example
+++ b/
example
@@
-1,6
+1,9
@@
#!/usr/bin/wish8.4 -f
# -*- Tcl -*-
+# usage:
+# xbatmon-simple-tray
+
source applet.tcl
source subproc.tcl
@@
-25,4
+28,4
@@
proc cmdline {id orientation} {
return [list xacpi-simple -into $id]
}
-applet::setup-subproc
40 40 horizontal darkblue 1
cmdline
+applet::setup-subproc cmdline