byterazor/qpsmtpd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

use new plugin_name function when the plugins log()

Browse Source 
git-svn-id: https://svn.perl.org/qpsmtpd/branches/v010@49 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Ask Bjørn Hansen 2002-09-08 10:00:02 +00:00
parent 4ee8b164f9
commit 931c3dbdfa
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lib/Qpsmtpd/Plugin.pm
View File

@ -20,7 +20,8 @@ sub qp {
} }
sub log { sub log {
shift->qp->log(@_); my $self = shift;
$self->qp->log(shift, $self->plugin_name . " plugin: " . shift, @_);
} }
sub transaction { sub transaction {