Spool body when $transaction->body_fh() is called

Qpsmtpd::Transaction::body_filename() calls $self->body_spool() if the
message body has not already been spool to disk.  This adds the same
check to Qpsmtpd::Transaction::body_fh()
This commit is contained in:
jaredj 2009-03-25 07:38:05 -05:00 committed by Ask Bjørn Hansen
parent 16b4dbcd81
commit a52660a646

View File

@ -214,7 +214,10 @@ sub body_as_string {
} }
sub body_fh { sub body_fh {
return shift->{_body_file}; my ($self) = @_;
# Spool to disk if we weren't already doing so
$self->body_spool() unless $self->{_filename};
return $self->{_body_file};
} }
sub dup_body_fh { sub dup_body_fh {