]> Sergey Matveev's repositories - public-inbox.git/blobdiff - t/search-thr-index.t
search: get rid of most lookup_* subroutines
[public-inbox.git] / t / search-thr-index.t
index 6c6e4c57639dab2b63dc27d7d4e2ade0f8bc9143..9549976d6c1fb80144ccf97179eb00bbeac2fd4a 100644 (file)
@@ -4,6 +4,7 @@ use strict;
 use warnings;
 use Test::More;
 use File::Temp qw/tempdir/;
+use PublicInbox::MID qw(mids);
 use Email::MIME;
 eval { require PublicInbox::SearchIdx; };
 plan skip_all => "Xapian missing for search" if $@;
@@ -41,7 +42,7 @@ foreach (reverse split(/\n\n/, $data)) {
        $mime->header_set('From' => 'bw@g');
        $mime->header_set('To' => 'git@vger.kernel.org');
        my $bytes = bytes::length($mime->as_string);
-       my $mid = $mime->header('Message-Id');
+       my $mid = mids($mime->header_obj)->[0];
        my $doc_id = $rw->add_message($mime, $bytes, ++$num, 'ignored', $mid);
        push @mids, $mid;
        ok($doc_id, 'message added: '. $mid);