From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 15 Jul 2001 12:12:24 +0000 (+0000)
Subject: When failing, print right msg.
X-Git-Tag: branchpoint-2001-10-09-tell~6
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/ircbot/commitdiff_plain/cd8c3236df9b5e2804e34f6a36fe714c4e626b1c

When failing, print right msg.
---

diff --git a/usebnbot.tcl b/usebnbot.tcl
index 8e227c6..b164f12 100644
--- a/usebnbot.tcl
+++ b/usebnbot.tcl
@@ -42,7 +42,7 @@ def_bnbot writemsg {str} {
 
 def_bnbot onread {args} {
     global channel
-    if {[gets $bnchan l] == -1} { fail "bot $bot EOF/error on input" }
+    if {[gets $bnchan l] == -1} { fail "bot $botid EOF/error on input" }
     if {[regexp {^1005 TALK ([^ ]+) \w+ \"(.*)\"$} $l dummy n text]} {
 	sendprivmsg $channel "\[$n] $text"
 	return