chiark
/
gitweb
/
~mdw
/
ircbot
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
3e58066
)
times right
author
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Mon, 10 Jun 2002 03:13:26 +0000
(
03:13
+0000)
committer
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Mon, 10 Jun 2002 03:13:26 +0000
(
03:13
+0000)
ledmodule.tcl
patch
|
blob
|
blame
|
history
diff --git
a/ledmodule.tcl
b/ledmodule.tcl
index 33e1483142f0bcf6b96326b9f4e567c18a698dea..3c2dec21e5cace6f2708d26a706f0944757ba3bd 100644
(file)
--- a/
ledmodule.tcl
+++ b/
ledmodule.tcl
@@
-1,5
+1,5
@@
# see ledbot.html
-# $Id: ledmodule.tcl,v 1.1
3 2002-06-10 02:35:07
ijackson Exp $
+# $Id: ledmodule.tcl,v 1.1
4 2002-06-10 03:13:26
ijackson Exp $
set helpfile ledhelp
@@
-286,7
+286,7
@@
proc reloaduser {username} {
string match $gl {}
lappend cc($kind) $gl
}
- } elseif {[regexp {^times\s+(\d+)\s+(\d+)$} $l dummy r
rnow
]} {
+ } elseif {[regexp {^times\s+(\d+)\s+(\d+)$} $l dummy r
now r
]} {
foreach cv {{} now} { set cc(time-recent$cv) [set r$cv] }
} elseif {[regexp {^monitor\s+(\S+)\s+(\S.*)$} $l dummy m cl]} {
set cc(chans) {}