sydney/Autobot
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Store channels with case insensitivity.

Browse Source
This commit is contained in:
Elijah Perrault committed 2011-02-14 14:48:26 -07:00
1 parent 80004fe047
commit 50a3f73a82
1 file changed
+2 -2
Download Patch File Download Diff File Expand all files Collapse all files
lib/Parser/IRC.pm
+2 -2
View File
@@ -301,12 +301,12 @@ sub cjoin
# Check if this is coming from ourselves. # Check if this is coming from ourselves.
if ($src{nick} eq $botnick{$svr}{nick}) { if ($src{nick} eq $botnick{$svr}{nick}) {
$botchans{$svr}{substr $ex[2], 1} = 1; $botchans{$svr}{lc(substr $ex[2], 1)} = 1;
API::Std::event_run("on_ucjoin", ($svr, substr($ex[2], 1))); API::Std::event_run("on_ucjoin", ($svr, substr($ex[2], 1)));
} }
else { else {
# It isn't. Update chanusers and trigger on_rcjoin. # It isn't. Update chanusers and trigger on_rcjoin.
$chanusers{$svr}{substr $ex[2], 1}{$src{nick}} = 1; $chanusers{$svr}{lc(substr $ex[2], 1)}{$src{nick}} = 1;
API::Std::event_run("on_rcjoin", ($svr, \%src, substr($ex[2], 1))); API::Std::event_run("on_rcjoin", ($svr, \%src, substr($ex[2], 1)));
} }