X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/ircbot/blobdiff_plain/942864785b8cdd578610d780e6b983f57caaea3d..dce9eb946703d0811e6befe4297bc065298ab3e9:/bot.tcl diff --git a/bot.tcl b/bot.tcl index bcbc1bc..b26d1c6 100755 --- a/bot.tcl +++ b/bot.tcl @@ -90,7 +90,7 @@ proc out_runqueue {now} { set out_queue [lrange $out_queue 1 end] if {[llength $out_queue]} { append orgwhen "+[expr {$now - $orgwhen}]" - append orgwhen ([llength $out_queue])" + append orgwhen "([llength $out_queue])" } puts "$orgwhen -> $msg" puts $sock $msg