summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
2761b3f)
an assumption that should never have been made.
Reduce test-count accordingly.
use strict;
use warnings;
use strict;
use warnings;
-use Test::More tests => 87;
+use Test::More tests => 81;
BEGIN { use_ok('Net::Z3950::ZOOM') };
BEGIN { use_ok('Net::Z3950::ZOOM') };
"got title term $i of $n: '$term' ($occ occurences)");
ok($term ge $previous, "title term '$term' ge previous '$previous'");
$previous = $term;
"got title term $i of $n: '$term' ($occ occurences)");
ok($term ge $previous, "title term '$term' ge previous '$previous'");
$previous = $term;
- ok((grep { $term eq $_ } @terms),
- "title term ($term) was in term list (@terms)");
+ # See comment in 25-scan.t
+ #ok((grep { $term eq $_ } @terms), "title term ($term) was in term list (@terms)");
}
Net::Z3950::ZOOM::scanset_destroy($ss);
}
Net::Z3950::ZOOM::scanset_destroy($ss);