diff options
author | David Phillips <david@sighup.nz> | 2019-06-23 14:27:10 +1200 |
---|---|---|
committer | David Phillips <david@sighup.nz> | 2019-06-23 14:27:10 +1200 |
commit | cc32474c98aa46b69856e276a46f325e29588f93 (patch) | |
tree | fb942ee32c768a532b5dd60f45a147a1a8ee9a55 /Plugin | |
parent | 6f76af376a0a3838447190fd1eeb723c15d0bb99 (diff) | |
download | idalius-cc32474c98aa46b69856e276a46f325e29588f93.tar.xz |
Log private messages, too
Diffstat (limited to 'Plugin')
-rw-r--r-- | Plugin/Log.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/Plugin/Log.pm b/Plugin/Log.pm index a5dee69..a993d3f 100644 --- a/Plugin/Log.pm +++ b/Plugin/Log.pm @@ -17,6 +17,7 @@ my %t = ( host => color("magenta"), channel => color("blue"), message => color("reset"), + private => color("magenta"), misc => color("bright_black"), reset => color("reset") ); @@ -92,6 +93,12 @@ sub on_message { return; } +sub on_privmsg { + my ($self, $logger, $who, $to, $raw_what, $what, $irc) = @_; + $logger->("$t{bracket}\[$t{channel}private$t{bracket}\] $t{nick}$who$t{bracket}: $t{private}$what$t{reset}"); + return; +} + sub on_action { my ($self, $logger, $who, $where, $raw_what, $what, $irc) = @_; $logger->("$t{bracket}\[$t{channel}$where->[0]$t{bracket}\] $t{message}* $t{nick}$who $t{message}$raw_what$t{reset}"); |