chiark
/
gitweb
/
~ian
/
chiark-tcl-applet.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
6c617c3e446f40aefdf7debf190dc9c40e2422ec
[chiark-tcl-applet.git]
/
xbatmon-simple-tray
1
#!/usr/bin/wish
2
# -*- Tcl -*-
3
4
source applet.tcl
5
source subproc.tcl
6
7
proc cmdline {id} {
8
return [list xacpi-simple -into $id]
9
}
10
11
applet::setup-subproc 70 darkblue 1 cmdline