added ts guard
This commit is contained in:
+4
-1
@@ -58,7 +58,10 @@ proc formatmessage {msgdata msgid globalwidth} {
|
|||||||
set subj [lindex $msglines 6]
|
set subj [lindex $msglines 6]
|
||||||
set msgbody [tiiflow [lrange $msglines 8 end] $globalwidth]
|
set msgbody [tiiflow [lrange $msglines 8 end] $globalwidth]
|
||||||
set tz ""
|
set tz ""
|
||||||
set renderedts [clock format $timestamp -format {%Y-%m-%d %H:%M:%S} -timezone $tz]
|
set renderedts ""
|
||||||
|
catch { # because some servers don't provide timestamps
|
||||||
|
set renderedts [clock format $timestamp -format {%Y-%m-%d %H:%M:%S} -timezone $tz]
|
||||||
|
}
|
||||||
catch { # because pipe can be broken anytime
|
catch { # because pipe can be broken anytime
|
||||||
puts "\[$renderedts\] ii://$msgid"
|
puts "\[$renderedts\] ii://$msgid"
|
||||||
puts "$echoarea - $msgfrom ($msgfromaddr) to $msgto"
|
puts "$echoarea - $msgfrom ($msgfromaddr) to $msgto"
|
||||||
|
|||||||
Reference in New Issue
Block a user