chiark / gitweb /
times right
authorijackson <ijackson>
Mon, 10 Jun 2002 03:13:26 +0000 (03:13 +0000)
committerijackson <ijackson>
Mon, 10 Jun 2002 03:13:26 +0000 (03:13 +0000)
ledmodule.tcl

index e07b046f6f32e5a6632384a9a0c780e2107f6dc2..ac1198f984adb1c27fc2e8bf961a8473be75b63e 100644 (file)
@@ -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) {}