diff options
author | Jesse Luehrs <doy@tozt.net> | 2009-11-26 01:18:25 -0600 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2009-11-26 01:18:25 -0600 |
commit | 441ec7fe1b0e211a3f747febdffcc996f50c12c3 (patch) | |
tree | 3c0452d947dcf96a8ac3c0ac11a5a0b1a0ede6af /lib/Crawl/Bot.pm | |
parent | 2583b21383f2654a052513f6ff51f5688d43d2fd (diff) | |
download | crawlbot-441ec7fe1b0e211a3f747febdffcc996f50c12c3.tar.gz crawlbot-441ec7fe1b0e211a3f747febdffcc996f50c12c3.zip |
a bit more debugging output
Diffstat (limited to 'lib/Crawl/Bot.pm')
-rw-r--r-- | lib/Crawl/Bot.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/Crawl/Bot.pm b/lib/Crawl/Bot.pm index 75e8a0d..0ca557d 100644 --- a/lib/Crawl/Bot.pm +++ b/lib/Crawl/Bot.pm @@ -119,4 +119,10 @@ sub tick { return $self->update_time; } +before say => sub { + my $self = shift; + my %params = @_; + warn "sending '$params{body}' to $params{channel}"; +}; + 1; |