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) {}
lappend l [dset_visibledest $d]
}
if {[llength $l]} {
- sendprivmsg $nl "LEDs are watching on [\
+ sendprivmsg $nl "LEDs are watching you on [\
join [lsort [array names wch]] ","]: [join $l " "]"
}
}