Kill circular reference.
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@888 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
e600baeedf
commit
aa016d356e
@ -72,6 +72,7 @@ sub finish_queue {
|
|||||||
my ($self, $transaction) = @_;
|
my ($self, $transaction) = @_;
|
||||||
|
|
||||||
my $sender = $transaction->notes('async_sender');
|
my $sender = $transaction->notes('async_sender');
|
||||||
|
$transaction->notes('async_sender', undef);
|
||||||
|
|
||||||
my ($rc, $msg) = $sender->results;
|
my ($rc, $msg) = $sender->results;
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user