add notes method to the Connection object. (used in the dnsbl plugin)
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@68 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
fcbf3b0ad4
commit
1cea2f9449
@ -51,5 +51,11 @@ sub hello_host {
|
|||||||
$self->{_hello_host};
|
$self->{_hello_host};
|
||||||
}
|
}
|
||||||
|
|
||||||
|
sub notes {
|
||||||
|
my $self = shift;
|
||||||
|
my $key = shift;
|
||||||
|
@_ and $self->{_notes}->{$key} = shift;
|
||||||
|
$self->{_notes}->{$key};
|
||||||
|
}
|
||||||
|
|
||||||
1;
|
1;
|
||||||
|
Loading…
Reference in New Issue
Block a user