Permalink
Browse files

Enclose Message-ID in <...>

Reported by Rene Snajder
  • Loading branch information...
1 parent 3545319 commit 2e6f93745d01098c5c92619046828a8fbca864f0 @mludvig committed Jun 2, 2015
Showing with 1 addition and 1 deletion.
  1. +1 −1 smtp-cli
View
2 smtp-cli
@@ -886,7 +886,7 @@ sub build_message
$message->replace("Cc" => join(", ", @cc));
$message->replace("Subject" => $subject);
$message->replace("X-Mailer" => "smtp-cli $version, see http://smtp-cli.logix.cz");
- $message->replace("Message-ID" => time()."-".int(rand(999999))."\@smtp-cli");
+ $message->replace("Message-ID" => "<".time()."-".int(rand(999999))."\@smtp-cli>");
for my $header (@add_headers) {
my ($hdr, $val) = ($header =~ /^([^:]+):\s*(.*)$/);

0 comments on commit 2e6f937

Please sign in to comment.