From ed3d57c9747010ce8c2174ff2463cb50a13f247b Mon Sep 17 00:00:00 2001 From: David Phillips Date: Sun, 23 Jun 2019 14:49:45 +1200 Subject: Log notices --- Plugin/Log.pm | 6 ++++++ idalius.pl | 10 +++++++++- 2 files changed, 15 insertions(+), 1 deletion(-) 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) { diff --git a/idalius.pl b/idalius.pl index 4f789d9..39eb56a 100755 --- a/idalius.pl +++ b/idalius.pl @@ -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 = (); -- cgit v1.1