Commit 5601df45 authored by mkanat%kerio.com's avatar mkanat%kerio.com

Bug 281733: testfile mail transport cannot write to testfile

Patch By Fré©ric Buclin <LpSolit@gmail.com> r=joe a=myk
parent 4d2f2325
......@@ -898,7 +898,10 @@ sub MessageToMTA ($) {
push @args, Server => Param("smtpserver");
}
my $mailer = new Mail::Mailer Param("maildeliverymethod"), @args;
if (Param("maildeliverymethod") eq "testfile") {
$Mail::Mailer::testfile::config{outfile} = "$datadir/mailer.testfile";
}
$msg =~ /(.*?)\n\n(.*)/ms;
my @header_lines = split(/\n/, $1);
my $body = $2;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment