X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=t%2Fv2reindex.t;h=990513a3ac07d024d4d1742a864aaa81105ef2c9;hp=2c6bdd571979c0777c5f21293a6024307bb90365;hb=0f81681256c9f24c37759e26c6c21db187374438;hpb=dd694f1c3797ce0ca7a4748a97f8af536ef21c2e diff --git a/t/v2reindex.t b/t/v2reindex.t index 2c6bdd57..990513a3 100644 --- a/t/v2reindex.t +++ b/t/v2reindex.t @@ -157,7 +157,7 @@ ok(!-d $xap, 'Xapian directories removed again'); is($ibx->mm->num_highwater, 10, 'num_highwater as expected'); my $mset = $ibx->search->query($phrase, {mset=>1}); isnt($mset->size, 0, "phrase search succeeds on indexlevel=full"); - for (<"$xap/*/*">) { $sizes{$ibx->{indexlevel}} += -s _ if -f $_ } + for (glob("$xap/*/*")) { $sizes{$ibx->{indexlevel}} += -s _ if -f $_ } my ($min, $max) = $ibx->mm->minmax; is_deeply($ibx->mm->msg_range(\$min, $max), $msgmap, 'msgmap unchanged'); @@ -193,7 +193,7 @@ ok(!-d $xap, 'Xapian directories removed again'); $words =~ tr/"'//d; my $mset = $ibx->search->query($words, {mset=>1}); isnt($mset->size, 0, "normal search works on indexlevel=medium"); - for (<"$xap/*/*">) { $sizes{$ibx->{indexlevel}} += -s _ if -f $_ } + for (glob("$xap/*/*")) { $sizes{$ibx->{indexlevel}} += -s _ if -f $_ } ok($sizes{full} > $sizes{medium}, 'medium is smaller than full'); @@ -223,7 +223,7 @@ ok(!-d $xap, 'Xapian directories removed again'); isnt($ibx->search, 'no search for basic'); - for (<"$xap/*/*">) { $sizes{$ibx->{indexlevel}} += -s _ if -f $_ } + for (glob("$xap/*/*")) { $sizes{$ibx->{indexlevel}} += -s _ if -f $_ } ok($sizes{medium} > $sizes{basic}, 'basic is smaller than medium'); my ($min, $max) = $ibx->mm->minmax;