Bug 10403: (follow-up) fix test to use vendor created earlier during test
[koha.git] / t / Search_PazPar2.t
index 8d51720..5af0ac4 100755 (executable)
@@ -6,9 +6,17 @@
 use strict;
 use warnings;
 
-use Test::More tests => 1;
+use Test::More tests => 8;
 
 BEGIN {
         use_ok('C4::Search::PazPar2');
 }
 
+my $obj = C4::Search::PazPar2->new();
+ok ($obj, "testing new works");
+is ($obj->init(), "1", "testing init returns '1' when given no arguments");
+is ($obj->search(), "1", "testing search returns '1' when given no arguments");
+is ($obj->stat(), undef, "testing stat returns undef when given no arguments");
+is ($obj->show(), undef, "testing show returns undef when given no arguments");
+is ($obj->record(), undef, "testing record returns undef when given no arguments");
+is ($obj->termlist(), undef, "testing termlist returns undef when given no arguments");