X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/ircbot/blobdiff_plain/35e1921958877a760b6757ec2b1be25066ce4937..942864785b8cdd578610d780e6b983f57caaea3d:/bot.tcl

diff --git a/bot.tcl b/bot.tcl
index d5afa81..bcbc1bc 100755
--- a/bot.tcl
+++ b/bot.tcl
@@ -625,7 +625,7 @@ proc msg_NICK {p c newnick} {
 	if {[info exists new]} { error "nick collision ?! $ary $n $newnick" }
 	if {[info exists old]} { set new $old; unset old }
     }
-    upvar #0 nick_onchans($new)
+    upvar #0 nick_onchans($new) oc
     set luser [irctolower $n]
     set lusernew [irctolower $newnick]
     foreach ch $oc {