chiark / gitweb /
ypp-chatlog-alerter: get minute length right (!)
authorIan Jackson <ian@liberator.relativity.greenend.org.uk>
Sun, 3 Oct 2010 23:41:20 +0000 (00:41 +0100)
committerIan Jackson <ian@liberator.relativity.greenend.org.uk>
Sun, 3 Oct 2010 23:41:20 +0000 (00:41 +0100)
ypp-chatlog-alerter

index 2f6d86e..caefc5e 100755 (executable)
@@ -119,7 +119,7 @@ proc retint {} {
        } elseif {$age < 120} {
            lappend newprtimes [format "%3ds" $age]
        } else {
-           lappend newprtimes [format "%3dm" [expr {$age/120}]]
+           lappend newprtimes [format "%3dm" [expr {$age/60}]]
        }
        set latest [expr { $time > $latest ? $time : $latest }]
        set tint [expr { exp( (-($age >= 0 ? $age : 0) + 0.0) / $e_life ) }]