From: unknown <sysadmin@gnu.org>
Date: Tue, 4 May 2010 19:04:59 +0000 (-0500)
Subject: Import version as of 2010-05-04 for upload-ftp-v1.1.pl
X-Git-Tag: 20200730__import~27
X-Git-Url: https://vcs.fsf.org/?a=commitdiff_plain;h=c0497fbb80a6bc60688fd3f21d0c79acf77e98b3;p=gatekeeper.git

Import version as of 2010-05-04 for upload-ftp-v1.1.pl
---

diff --git a/upload-ftp-v1.1.pl b/upload-ftp-v1.1.pl
index 01a1fff..7ba545b 100755
--- a/upload-ftp-v1.1.pl
+++ b/upload-ftp-v1.1.pl
@@ -1163,13 +1163,13 @@ sub mail {
       $smtp->datasend("Message-ID: <$mid>\r\n");
       $smtp->datasend("Date: " . strftime("%a, %e %b %Y %H:%M:%S %z", localtime) . "\r\n");
       if ($subject ne '') {
-          $smtp->datasend ("Subject: [gnu-ftp-upload] $subject");
+          $smtp->datasend ("Subject: [$m_style gnu-ftp-upload] $subject");
           ftp_syslog('info', "($log_style) Subject: '$subject'");
       } elsif (defined $info{package}) {
-          $smtp->datasend ("Subject: [gnu-ftp-upload] $info{package}");
+          $smtp->datasend ("Subject: [$m_style gnu-ftp-upload] $info{package}");
           ftp_syslog('info', "($log_style) Subject: $info{package}");
       } else {
-          $smtp->datasend ("Subject: [gnu-ftp-upload] generic failure");
+          $smtp->datasend ("Subject: [$m_style gnu-ftp-upload] generic failure");
           ftp_syslog('warning', "($log_style) Error uploading package: $msg");
           ftp_syslog('info', "($log_style) Subject: generic failure");
       }