v2writable: generated Message-ID goes first

This is to make SearchMsg behave more sanely under NNTP.

diff --git a/lib/PublicInbox/V2Writable.pm b/lib/PublicInbox/V2Writable.pm
index 6d7382780b6607acae8818d2ec2d399f944707ec..c73d859b8fb880e835fc35ef0457eec8a94bec04 100644 (file)
--- a/lib/PublicInbox/V2Writable.pm
+++ b/lib/PublicInbox/V2Writable.pm
@@ -142,7 +142,7 @@ sub num_for_harder {
                }
        }
        my @cur = $hdr->header_raw('Message-Id');
-       $hdr->header_set('Message-Id', @cur, "<$mid>");
+       $hdr->header_set('Message-Id', "<$mid>", @cur);
        $num;
 }
 

diff --git a/t/v2writable.t b/t/v2writable.t
index 44191c136026aa590ebd172eb148eeaa7053f965..f95b2e7419200fb43cf25d6a1f0db09088ff3775 100644 (file)
--- a/t/v2writable.t
+++ b/t/v2writable.t
@@ -53,8 +53,8 @@ ok($im->add($mime), 'ordinary message added');
        ok($im->add($mime), 'reused mid ok');
        like(join(' ', @warn), qr/reused/, 'warned about reused MID');
        my @mids = $mime->header_obj->header_raw('Message-Id');
-       is($mids[0], '<a-mid@b>', 'original mid not changed');
-       like($mids[1], qr/\A<\w+\@localhost>\z/, 'new MID added');
+       is($mids[1], '<a-mid@b>', 'original mid not changed');
+       like($mids[0], qr/\A<\w+\@localhost>\z/, 'new MID added');
        is(scalar(@mids), 2, 'only one new MID added');
 
        @warn = ();
@@ -68,8 +68,8 @@ ok($im->add($mime), 'ordinary message added');
        ok($im->add($mime), 'random MID made');
        like(join(' ', @warn), qr/using random/, 'warned about using random');
        @mids = $mime->header_obj->header_raw('Message-Id');
-       is($mids[0], '<a-mid@b>', 'original mid not changed');
-       like($mids[1], qr/\A<\w+\@localhost>\z/, 'new MID added');
+       is($mids[1], '<a-mid@b>', 'original mid not changed');
+       like($mids[0], qr/\A<\w+\@localhost>\z/, 'new MID added');
        is(scalar(@mids), 2, 'only one new MID added');
 
        @warn = ();