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

Oops! init() gets $self and $qp before any commandline arguments

Browse Source 
git-svn-id: https://svn.perl.org/qpsmtpd/branches/0.3x@656 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
John Peacock 2006-07-24 19:10:38 +00:00
parent ca30545adc
commit 52f38f9459
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
plugins/domainkeys
View File

@ -1,5 +1,5 @@
sub init { sub init {
my ($self, %args) = @_; my ($self, $qp, %args) = @_;
foreach my $key ( %args ) { foreach my $key ( %args ) {
$self->{$key} = $args{$key}; $self->{$key} = $args{$key};