From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Mon, 25 Feb 2002 22:05:25 +0000 (+0000)
Subject: Nick on channel tracking bugfixes
X-Git-Url: https://git.distorted.org.uk/~mdw/ircbot/commitdiff_plain/14139a3335477e4233acec78fd3cc94431e1cc47

Nick on channel tracking bugfixes
---

diff --git a/bot.tcl b/bot.tcl
index 1060027..0bbc3b7 100755
--- a/bot.tcl
+++ b/bot.tcl
@@ -281,6 +281,7 @@ proc msg_MODE {p c dest modelist args} {
 }
 
 proc leaving {lchan} {
+    global nick_onchans
     foreach luser [array names nick_onchans] {
 	upvar #0 nick_onchans($luser) oc
 	set oc [grep tc {"$tc" != "$lchan"} $oc]
@@ -526,7 +527,7 @@ proc msg_366 {p c args} {
 	if {[llength names_chans] > 1} {
 	    set oc [grep tc {[lsearch -exact $tc $names_chans] >= 0} $oc]
 	}
-	if {![llength $oc]} { lnick_forget $n }
+	if {![llength $oc]} { lnick_forget $luser }
     }
     unset names_chans
 }