Produce error if you say "register spong". Change mustpingbefore to muststartby...

[ircbot] / usebnbot.tcl

diff --git a/usebnbot.tcl b/usebnbot.tcl
index ee7737ac3063f47d0caeb68a05e1a23f12ddef7d..8e227c6a8a00eb6089150c1222443cd1751844f8 100644 (file)
--- a/usebnbot.tcl
+++ b/usebnbot.tcl
@@ -18,13 +18,13 @@ proc bnbot__vars {} {
 }
 
 def_bnbot ensure_connecting {} {
-    global musthaveping_ms bnbot
+    global muststartby_ms bnbot
     
     if {[info exists bnchan]} return
     defset bnport 6112
     set bnchan [open [list | $bnbot $bnhost $bnport] w+]
     fconfigure $bnchan -buffering line
-    set bnmbokafter [after $musthaveping_ms \
+    set bnmbokafter [after $muststartby_ms \
            "fail {bot $botid not ok within timeout}"]
     set bnstate Connected
     fileevent $bnchan readable [list bnbot_onread $botid]