From 77ac451eacee0e5757c5ef74591fca38984a0b07 Mon Sep 17 00:00:00 2001 From: Janik Kleinhoff Date: Mon, 6 Apr 2015 04:20:50 +0400 Subject: %::synced: always lowercase channel names --- modules/event.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'modules/event.pl') diff --git a/modules/event.pl b/modules/event.pl index b1876cd..79441f5 100644 --- a/modules/event.pl +++ b/modules/event.pl @@ -815,7 +815,7 @@ sub on_whoxover { my ($conn, $event) = @_; my $chan = pop @::syncqueue; - $::synced{$event->{args}->[1]} = 1; + $::synced{lc $event->{args}->[1]} = 1; if (defined($chan) ){ $conn->sl('who ' . $chan . ' %tcnuhra,314'); $conn->sl('mode ' . $chan); -- cgit v1.2.3