diff options
| -rw-r--r-- | Plugin/Log.pm | 6 | ||||
| -rwxr-xr-x | idalius.pl | 10 |
2 files changed, 15 insertions, 1 deletions
diff --git a/Plugin/Log.pm b/Plugin/Log.pm index dc2c6d3..dd092f5 100644 --- a/Plugin/Log.pm +++ b/Plugin/Log.pm @@ -134,6 +134,12 @@ sub on_invite { return; } +sub on_notice { + my ($self, $logger, $who, $where, $message, $irc) = @_; + $logger->("$t{bracket}\[$t{channel}$where$t{bracket}\]$t{info} --- Notice: $t{nick}$who$t{info}: $t{message}$message$t{reset}"); + return; +} + sub on_topic { my ($self, $logger, $who, $where, $topic, $irc) = @_; if ($topic) { @@ -70,6 +70,7 @@ POE::Session->create( irc_kick irc_ctcp_action irc_public + irc_notice irc_topic irc_ping irc_msg @@ -500,12 +501,19 @@ sub irc_invite { # irc_disconnected # irc_error # irc_mode -# irc_notice # irc_quit # irc_socketerr # irc_whois # irc_whowas +sub irc_notice { + my ($who, $where, $message) = @_[ARG0 .. ARG2]; + my @empty = (); + + trigger_modules("notice", $who, $where, \@empty, ($who, $where->[0], $message)); + return; +} + sub irc_topic { my ($who, $where, $topic) = @_[ARG0 .. ARG2]; my @empty = (); |