From 3b365d17bd88f6c0ca72c435d7696a22e7c166bd Mon Sep 17 00:00:00 2001 From: DasBrain Date: Sat, 17 Apr 2021 13:15:40 +0200 Subject: [PATCH] Cleanup state when we disconnect. --- tcl/keepnick/keepnick.tcl | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/tcl/keepnick/keepnick.tcl b/tcl/keepnick/keepnick.tcl index e2b6099..cfbc42c 100644 --- 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] } \ No newline at end of file