use fti_au for author search

[Biblio-Z3950.git] / t / 4-vuFind.t

diff --git a/t/4-vuFind.t b/t/4-vuFind.t
index b5d5809..e00e320 100755 (executable)
--- a/t/4-vuFind.t
+++ b/t/4-vuFind.t
@@ -3,7 +3,7 @@
 use warnings;
 use strict;
 
-use Test::More tests => 14;
+use Test::More tests => 29;
 
 my $search = join(' ', @ARGV) || 'croatia';
 
@@ -14,7 +14,7 @@ ok( my $o = vuFind->new(), 'new' );
 ok( my $hits = $o->search( $search ), "search: $search" );
 like $hits, qr/^\d+$/, "hits: $hits";
 
-foreach ( 1 .. 10 ) {
+foreach ( 1 .. 25 ) { # > 20 to hit next page
 
        ok( my $marc = $o->next_marc, "next_marc $_" );
        diag $marc;