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:
parent
16b4dbcd81
commit
a52660a646
@ -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 {
|
||||||
|
Loading…
Reference in New Issue
Block a user