Cleanup state when we disconnect.

DasBrain · Apr 17, 2021 · 3b365d1 · 3b365d1
1 parent f8f6ff7
commit 3b365d1
Showing 1 changed file with 7 additions and 2 deletions.
diff --git a/tcl/keepnick/keepnick.tcl b/tcl/keepnick/keepnick.tcl
@@ -34,7 +34,7 @@ proc keepnick:connected {} {
 }
 
 on XC_UCHANGENICK keepnick {
-	variable wantednicks
+	global wantednicks
 	set sid [serverid]
 	if {[dict exists $wantednicks $sid]} {
 		set newnick [lindex $_raw 2]
@@ -45,7 +45,7 @@ on XC_UCHANGENICK keepnick {
 }
 
 on QUIT keepnick {
-	variable wantednicks
+	global wantednicks
 	set sid [serverid]
 	if {[dict exists $wantednicks $sid]} {
 		set wanted [dict get $wantednicks $sid]
@@ -54,4 +54,9 @@ on QUIT keepnick {
 			command "NICK $wanted"
 		}
 	}
+}
+
+on XC_DISCON keepnick {
+	global wantednicks
+	dict unset wantednicks [serverid]
 }