}
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]
} elseif {[regexp {^1007 CHANNEL "(.*)"} $l dummy bnchanfn]} {
after cancel $bnmbokafter
unset bnmbokafter
- } elseif {![string length $bnstate]} {
+ } elseif {[info exists bnchanfn]} {
bnbot_event $botid $l
}
}