Bug 237638: make bugzilla_email_append.pl work with BugMail.pm instead of processmail

a=justdave

diff --git a/contrib/bugzilla_email_append.pl b/contrib/bugzilla_email_append.pl
index 007fd153ce646e5be3619db94117a91a474cabf2..fee9b62ac8b67da3602e753f03217c01135fecb6 100755 (executable)
--- a/contrib/bugzilla_email_append.pl
+++ b/contrib/bugzilla_email_append.pl
@@ -40,6 +40,7 @@ BEGIN {
 require "globals.pl";
 use BugzillaEmail;
 use Bugzilla::Config qw(:DEFAULT $datadir);
+use Bugzilla::BugMail;
 
 # Create a new MIME parser:
 my $parser = new MIME::Parser;
@@ -118,7 +119,7 @@ my $Body = "Subject: " . $Subject . "\n" . $Comment;
 my $long_desc_query = "INSERT INTO longdescs SET bug_id=$found_id, who=$userid, bug_when=NOW(), thetext=" . SqlQuote($Body) . ";";
 SendSQL($long_desc_query);
 
-system("./processmail", $found_id, $SenderShort);
+Bugzilla::BugMail::Send( $found_id, { changer => $SenderShort } );
 
 sub DealWithError {
   my ($reason) = @_;