+SKIP: {
+ require_mods(qw(DBD::SQLite Search::Xapian IO::Uncompress::Gunzip), 3);
+ my $ibx = $config->lookup_name('test');
+ require_ok 'PublicInbox::SearchIdx';
+ PublicInbox::SearchIdx->new($ibx, 1)->index_sync;
+ test_psgi($app, sub {
+ my ($cb) = @_;
+ my $res = $cb->(GET('/a/test/blah@example.com/t.mbox.gz'));
+ my $gz = $res->content;
+ my $raw;
+ IO::Uncompress::Gunzip::gunzip(\$gz => \$raw);
+ like($raw, qr!^List-Archive: <http://[^/]+/a/test/>!m,
+ 'List-Archive set in /t.mbox.gz mboxrd');
+ like($raw,
+ qr!^Archived-At:\x20
+ <http://[^/]+/a/test/blah\@example\.com/>!mx,
+ 'Archived-At set in /t.mbox.gz mboxrd');
+ });
+}
+