forward along most other informational methods to plugins

1 files changed, 8 insertions, 0 deletions

diff --git a/lib/Crawl/Bot.pm b/lib/Crawl/Bot.pm
index 1f74762..111490d 100644
--- a/lib/Crawl/Bot.pm
+++ b/lib/Crawl/Bot.pm
@@ -57,6 +57,14 @@ sub tick {
     return $self->update_time;
 }
 
+for my $meth (qw(said         emoted   chanjoin  chanpart
+                 nick_change  kicked   topic     userquit)) {
+    __PACKAGE__->meta->add_method($meth => sub {
+        my $self = shift;
+        $_->$meth(@_) for @{ $self->plugins };
+    });
+}
+
 sub say_all {
     my $self = shift;
     my ($message) = @_;