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 01a1fff1b6c1e6975b56ed1d492f00280ffdd78a..7ba545b7deff7ddcbf82898d436e4773e9705913 100755 (executable)
--- 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");
       }