diff options
author | Neil Moore <neil@s-z.org> | 2012-01-02 22:38:21 -0500 |
---|---|---|
committer | Neil Moore <neil@s-z.org> | 2012-01-02 22:38:21 -0500 |
commit | 2ccf5107e0d93c9bcf92a1232e5a83329b90f1b4 (patch) | |
tree | 3330f8a8a416bc1c8d0f7adca97d5cf2826a19d8 /lib/Crawl/Bot/Plugin/Mantis.pm | |
parent | 23c1498b3817a6959c85787b5f962734da9095a6 (diff) | |
download | crawlbot-2ccf5107e0d93c9bcf92a1232e5a83329b90f1b4.tar.gz crawlbot-2ccf5107e0d93c9bcf92a1232e5a83329b90f1b4.zip |
Send responses to the correct channel/user, not everyone.
Diffstat (limited to 'lib/Crawl/Bot/Plugin/Mantis.pm')
-rw-r--r-- | lib/Crawl/Bot/Plugin/Mantis.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/Crawl/Bot/Plugin/Mantis.pm b/lib/Crawl/Bot/Plugin/Mantis.pm index e6ff7be..5498bc9 100644 --- a/lib/Crawl/Bot/Plugin/Mantis.pm +++ b/lib/Crawl/Bot/Plugin/Mantis.pm @@ -17,9 +17,11 @@ sub item_to_id { sub said { my $self = shift; my ($args) = @_; + + my @keys = (who => $args->{who}, channel => $args->{channel}, "body"); if ($args->{body} =~ /^%bug (\d+)$/) { - $self->say_all("https://crawl.develz.org/mantis/view.php?id=$1"); + $self->say(@keys, "https://crawl.develz.org/mantis/view.php?id=$1"); } } |