X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=t%2F3-GoogleBooks.t;fp=t%2F3-GoogleBooks.t;h=0266d082c46143d5968cee5cc0302133ba6dcf79;hb=64aeeafde6bf47fe1112d8408601111920d07f65;hp=62156d05a95257e5fa7abd45acbfdc6f368c4004;hpb=ac11395d9c76849d4bbda2c49820070e9d7c9ae9;p=Biblio-Z3950.git

diff --git a/t/3-GoogleBooks.t b/t/3-GoogleBooks.t
index 62156d0..0266d08 100755
--- a/t/3-GoogleBooks.t
+++ b/t/3-GoogleBooks.t
@@ -5,11 +5,13 @@ use strict;
 
 use Test::More tests => 14;
 
+my $search = join(' ', @ARGV) || 'croatia';
+
 use_ok 'GoogleBooks';
 
 ok( my $o = GoogleBooks->new(), 'new' );
 
-ok( my $hits = $o->search( 'croatia' ), 'search' );
+ok( my $hits = $o->search( $search ), "search: $search" );
 like $hits, qr/^\d+$/, "hits: $hits";
 
 foreach ( 1 .. 10 ) {