diff options
| author | mkanat%kerio.com <> | 2005-02-17 08:54:47 +0100 |
|---|---|---|
| committer | mkanat%kerio.com <> | 2005-02-17 08:54:47 +0100 |
| commit | 5601df4505bb893aea5956bceefa28abf9014e5d (patch) | |
| tree | 61ae14092dda9ecaeb7c031ca0aae0f3fd789a27 /Bugzilla/BugMail.pm | |
| parent | 4d2f2325507877dd6743dd0f9474ee748e18a41e (diff) | |
| download | bugzilla-5601df4505bb893aea5956bceefa28abf9014e5d.tar.gz bugzilla-5601df4505bb893aea5956bceefa28abf9014e5d.tar.xz | |
Bug 281733: testfile mail transport cannot write to testfile
Patch By Frédéric Buclin <LpSolit@gmail.com> r=joe a=myk
Diffstat (limited to 'Bugzilla/BugMail.pm')
| -rw-r--r-- | Bugzilla/BugMail.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/Bugzilla/BugMail.pm b/Bugzilla/BugMail.pm index fd1ac1a1c..bfe1c897e 100644 --- a/Bugzilla/BugMail.pm +++ b/Bugzilla/BugMail.pm @@ -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; |