From: unknown 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"); }