Subject: | Mail::Box::Construct::Read generates invalid Message-ID: header |
The attached patch fixes a bug where Mail::Box::Construct::Read generates Message-ID: headers which are missing the angle brackets.
diff -ur Mail-Box-2.060-orig/lib/Mail/Message/Construct/Read.pm Mail-Box-2.060/lib/Mail/Message/Construct/Read.pm
--- Mail-Box-2.060-orig/lib/Mail/Message/Construct/Read.pm 2005-03-15 13:02:43.000000000 -0800
+++ Mail-Box-2.060/lib/Mail/Message/Construct/Read.pm 2005-03-24 16:18:32.000000000 -0800
@@ -62,7 +62,7 @@
$parser->stop;
my $head = $self->head;
- $head->set('Message-ID' => $self->messageId)
+ $head->set('Message-ID' => '<'.$self->messageId.'>')
unless $head->get('Message-ID');
$head->delete('Status', 'X-Status') if $strip_status;
Only in Mail-Box-2.060/lib/Mail/Message/Construct: Read.pm~
Only in Mail-Box-2.060/lib/Mail/Message/Head: .#Complete.pm
Only in Mail-Box-2.060/lib/Mail/Message/Head: #Complete.pm#
Only in Mail-Box-2.060/lib/Mail: Message.pm~