Kill circular reference.

git-svn-id: https://svn.perl.org/qpsmtpd/trunk@888 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Radu Greab 2008-05-06 11:20:52 +00:00
parent e600baeedf
commit aa016d356e

View File

@ -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;