From c864470d4cf49249c6b4c0e412d9a060024d656e Mon Sep 17 00:00:00 2001 From: David Phillips Date: Sun, 29 Jul 2018 22:38:55 +1200 Subject: Add missing arguments to modules --- Plugin/Echo.pm | 2 +- Plugin/Map.pm | 2 +- Plugin/Ping.pm | 2 +- Plugin/Timezone.pm | 2 +- 4 files changed, 4 insertions(+), 4 deletions(-) (limited to 'Plugin') diff --git a/Plugin/Echo.pm b/Plugin/Echo.pm index 9b23af8..5f2c53a 100644 --- a/Plugin/Echo.pm +++ b/Plugin/Echo.pm @@ -19,7 +19,7 @@ sub configure { } sub echo { - my ($self, $logger, $who, $where, $rest, @arguments) = @_; + my ($self, $irc, $logger, $who, $where, $rest, @arguments) = @_; return $rest; } diff --git a/Plugin/Map.pm b/Plugin/Map.pm index 9ca8cef..4bd65a6 100644 --- a/Plugin/Map.pm +++ b/Plugin/Map.pm @@ -22,7 +22,7 @@ sub configure { } sub map { - my ($self, $logger, $who, $where, $rest, @arguments) = @_; + my ($self, $irc, $logger, $who, $where, $rest, @arguments) = @_; my ($command, $subjects) = ($rest =~ /^(.+?)\s+(.*)$/); return "[]" unless $subjects; diff --git a/Plugin/Ping.pm b/Plugin/Ping.pm index d935512..de6fd8e 100644 --- a/Plugin/Ping.pm +++ b/Plugin/Ping.pm @@ -17,7 +17,7 @@ sub configure { } sub ping { - my ($self, $logger, $who, $where, $rest, @arguments) = @_; + my ($self, $irc, $logger, $who, $where, $rest, @arguments) = @_; my $nick = (split /!/, $who)[0]; return "$nick: pong"; } diff --git a/Plugin/Timezone.pm b/Plugin/Timezone.pm index 60a0f34..594c5d7 100644 --- a/Plugin/Timezone.pm +++ b/Plugin/Timezone.pm @@ -21,7 +21,7 @@ sub configure { } sub time { - my ($self, $logger, $who, $where, $rest, @arguments) = @_; + my ($self, $irc, $logger, $who, $where, $rest, @arguments) = @_; my $requester = ( split /!/, $who)[0]; my @known_zones = (keys %{$config{timezone}}); -- cgit v1.1