Bug 281733: testfile mail transport cannot write to testfile

Patch By Frédéric Buclin <LpSolit@gmail.com> r=joe a=myk


git-svn-id: svn://10.0.0.236/trunk@169294 18797224-902f-48f8-a5cc-f745e15eee43

mozilla/webtools/bugzilla/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;