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};
|
||||
}
|
||||
|
||||
sub notes {
|
||||
my $self = shift;
|
||||
my $key = shift;
|
||||
@_ and $self->{_notes}->{$key} = shift;
|
||||
$self->{_notes}->{$key};
|
||||
}
|
||||
|
||||
1;
|
||||
|
Loading…
Reference in New Issue
Block a user