X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Fv2-add-remove-add.t;h=c758dbb6728e8dd7a27a9a8f2812c45fdce2700f;hb=b41c19abcf0b0ac8a5f55678bfb0058ad50b3179;hp=b6c58872d78d7fd1eb0a3fca9535e573d3e0ab95;hpb=c34a83286234ea1e876ebdf92a33744272bb6f4e;p=public-inbox.git diff --git a/t/v2-add-remove-add.t b/t/v2-add-remove-add.t index b6c58872..c758dbb6 100644 --- a/t/v2-add-remove-add.t +++ b/t/v2-add-remove-add.t @@ -1,10 +1,12 @@ -# Copyright (C) 2018 all contributors +# Copyright (C) 2018-2019 all contributors # License: AGPL-3.0+ use strict; use warnings; use Test::More; use PublicInbox::MIME; use File::Temp qw/tempdir/; +require './t/common.perl'; +require_git(2.6); foreach my $mod (qw(DBD::SQLite Search::Xapian)) { eval "require $mod"; @@ -35,8 +37,8 @@ ok($im->add($mime), 'message added'); ok($im->remove($mime), 'message added'); ok($im->add($mime), 'message added again'); $im->done; -my $res = $ibx->recent({limit => 1000}); -is($res->{msgs}->[0]->{mid}, 'a-mid@b', 'message exists in history'); -is(scalar @{$res->{msgs}}, 1, 'only one message in history'); +my $msgs = $ibx->recent({limit => 1000}); +is($msgs->[0]->{mid}, 'a-mid@b', 'message exists in history'); +is(scalar @$msgs, 1, 'only one message in history'); done_testing();