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

Here as well.

Browse Source
This commit is contained in:
Elijah Perrault committed 2011-04-20 20:56:21 -06:00
1 parent 362310b863
commit 6c4ff75a03
1 file changed
+1 -1
Download Patch File Download Diff File Expand all files Collapse all files
lib/Core/IRC.pm
+1 -1
View File
@@ -65,7 +65,7 @@ hook_add('on_cprivmsg', 'irc.commands.aliases', sub {
hook_add('on_uprivmsg', 'irc.commands.aliases', sub { hook_add('on_uprivmsg', 'irc.commands.aliases', sub {
my (($src, ($cmd, @args))) = @_; my (($src, ($cmd, @args))) = @_;
my $cprefix = (conf_get('fantasy_pf'))[0][0]; my $cprefix = (conf_get('fantasy_pf'))[0][0];
$cmd =~ s/^$cprefix//xsm; if (substr($cmd, 0, 1) eq $cprefix) { $cmd = substr $cmd, 1 }
# Check for an alias. # Check for an alias.
if (defined $API::Std::ALIASES{uc $cmd}) { if (defined $API::Std::ALIASES{uc $cmd}) {