From: Ian Jackson Date: Mon, 10 Jun 2002 03:13:26 +0000 (+0000) Subject: times right X-Git-Url: https://git.distorted.org.uk/~mdw/ircbot/commitdiff_plain/def7479c31b358baede8d7b4f8bde140cbca6e26 times right --- diff --git a/ledmodule.tcl b/ledmodule.tcl index 33e1483..3c2dec2 100644 --- a/ledmodule.tcl +++ b/ledmodule.tcl @@ -1,5 +1,5 @@ # see ledbot.html -# $Id: ledmodule.tcl,v 1.13 2002-06-10 02:35:07 ijackson Exp $ +# $Id: ledmodule.tcl,v 1.14 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 rnow 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) {}