Remove spurious @
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Mon, 15 Jan 2001 15:26:22 +0000 (15:26 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Mon, 15 Jan 2001 15:26:22 +0000 (15:26 +0000)
bot.tcl

diff --git a/bot.tcl b/bot.tcl
index bcbc1bc..b26d1c6 100755 (executable)
--- 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