From: Jacob Bachmeyer <jcb@gnu.org>
Date: Sun, 30 Oct 2022 03:28:04 +0000 (-0500)
Subject: Regularize mail sent by debug as compared to mail sent by mail
X-Git-Url: https://vcs.fsf.org/?a=commitdiff_plain;h=4c837396461bbe6cdbef352b55c331d190f5552e;p=gatekeeper.git

Regularize mail sent by debug as compared to mail sent by mail
---

diff --git a/gatekeeper.pl b/gatekeeper.pl
index c4ce02f..4590c3c 100755
--- a/gatekeeper.pl
+++ b/gatekeeper.pl
@@ -1141,7 +1141,7 @@ sub mail {
 	    ['Reply-To'	=> 'ftp-upload@gnu.org'],
 	    ['Message-ID'=> Email::MessageID->new->in_brackets],
 	   ],
-	   wrap('','',$msg) . "\n");
+	   wrap('','',$msg));
 }
 
 sub debug {
@@ -1152,9 +1152,11 @@ sub debug {
 	   [$maintainer_email],
 	   [[To		=> $maintainer_email],
 	    [From	=> 'ftp-upload-script@gnu.org'],
+	    [Date	=> strftime("%a, %e %b %Y %H:%M:%S %z", localtime)],
 	    [Subject	=> ("[$m_style gnu-ftp-debug] "
 			    ."new upload processed: $package_name")],
 	    ['Reply-To'	=> 'ftp-upload@gnu.org'],
+	    ['Message-ID'=> Email::MessageID->new->in_brackets],
 	   ],
 	   $msg);
 }