From: Doug Freed Date: Wed, 28 Dec 2022 09:39:42 +0000 (+0000) Subject: trigger: print trigger that tripped debug X-Git-Url: http://git.99rst.org/?a=commitdiff_plain;h=3dd1226df0989082e1bdd7f9a2a1ca00e0f81975;p=irssi-scripts.irssi.org.git trigger: print trigger that tripped debug --- diff --git a/scripts/trigger.pl b/scripts/trigger.pl index 95ab3f1..133b856 100644 --- a/scripts/trigger.pl +++ b/scripts/trigger.pl @@ -23,7 +23,7 @@ use Text::ParseWords; use IO::File; use vars qw($VERSION %IRSSI); -$VERSION = '1.2.6'; +$VERSION = '1.2.7'; %IRSSI = ( authors => 'Wouter Coekaerts', contact => 'wouter@coekaerts.be', @@ -31,7 +31,7 @@ $VERSION = '1.2.6'; description => 'execute a command or replace text, triggered by an event in irssi', license => 'GPLv2 or later', url => 'http://wouter.coekaerts.be/irssi/', - changed => '2022-09-13', + changed => '2022-12-28', ); sub cmd_help { @@ -637,7 +637,7 @@ TRIGGER: } if ($trigger->{'debug'}) { - print("DEBUG: trigger $condition pmesg=$parammessage message=$message server=$server->{tag} channel=$channelname nick=$nickname address=$address " . join(' ',map {$_ . '=' . $extra->{$_}} keys(%$extra))); + print("DEBUG: trigger $condition pmesg=$parammessage message=$message server=$server->{tag} channel=$channelname nick=$nickname address=$address " . join(' ',map {$_ . '=' . $extra->{$_}} keys(%$extra)) . " trigger=" . to_string($trigger)); } if ($trigger->{'stop'}) {