aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Phillips <david@sighup.nz>2018-07-29 22:36:15 +1200
committerDavid Phillips <david@sighup.nz>2018-07-29 22:36:15 +1200
commitc0ff50bd5082bb6c7093d907864dd799d52c5a98 (patch)
treed534757d3e282a22036fea2524356d4191ad8102
parentbf8314a0283f7565854fe773c5d1edf8e26c9660 (diff)
downloadidalius-c0ff50bd5082bb6c7093d907864dd799d52c5a98.tar.xz
Admin: rename join routine to avoid collision with CORE::join
-rw-r--r--Plugin/Admin.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/Plugin/Admin.pm b/Plugin/Admin.pm
index ad07da2..2a2a691 100644
--- a/Plugin/Admin.pm
+++ b/Plugin/Admin.pm
@@ -17,7 +17,7 @@ sub configure {
$cmdref->("action", sub { $self->action(@_); } );
$cmdref->("nick", sub { $self->nick(@_); } );
- $cmdref->("join", sub { $self->join(@_); } );
+ $cmdref->("join", sub { $self->join_channel(@_); } );
$cmdref->("part", sub { $self->part(@_); } );
$cmdref->("mode", sub { $self->mode(@_); } );
$cmdref->("kick", sub { $self->kick(@_); } );
@@ -74,7 +74,7 @@ sub action {
$irc->yield(ctcp => $arguments[0] => "ACTION $rest");
}
-sub join {
+sub join_channel {
my ($self, $irc, $logger, $who, $where, $rest, @arguments) = @_;
return unless is_admin($who);