Mercurial > hg > egg-tcls

comparison tj.tcl @ 678:7ff41e458ee0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
tj: Fix future TJ date displays.
author Matti Hamalainen <ccr@tnsp.org>
date Sun, 04 Apr 2021 23:38:13 +0300
parents 4156adacdc31
children 299a17b98f84
comparison
equal deleted inserted replaced
677:3f20ba53d3c7 678:7ff41e458ee0
182 182
183 if {$udelta < 0} { 183 if {$udelta < 0} {
184 set ufmt "tj_past" 184 set ufmt "tj_past"
185 set useconds [expr -$udelta] 185 set useconds [expr -$udelta]
186 } else { 186 } else {
187 set ufmt "tj_remaining" 187 set ufmt "tj_future"
188 set useconds $udelta 188 set useconds $udelta
189 } 189 }
190 190
191 tj_msg $upublic $unick $uchan $ufmt [list $uname $uid [tj_get_tj_str $useconds] [tj_ctime $ustamp]] 191 tj_msg $upublic $unick $uchan $ufmt [list $uname $uid [tj_get_tj_str $useconds] [tj_ctime $ustamp]]
192 } 192 }