From a14b3f6804fe5a9f445a8f92f2bb57cb0fcfe258 Mon Sep 17 00:00:00 2001 From: Nick Clemens Date: Fri, 24 Apr 2020 16:08:44 +0000 Subject: [PATCH] Bug 25277: Unit test --- t/db_dependent/Koha/Z3950Responder/GenericSession.t | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/t/db_dependent/Koha/Z3950Responder/GenericSession.t b/t/db_dependent/Koha/Z3950Responder/GenericSession.t index f888b02121..4b78e90f2c 100644 --- a/t/db_dependent/Koha/Z3950Responder/GenericSession.t +++ b/t/db_dependent/Koha/Z3950Responder/GenericSession.t @@ -23,7 +23,7 @@ our $child; subtest 'test_search' => sub { - plan tests => 19; + plan tests => 20; t::lib::Mocks::mock_preference('SearchEngine', 'Elasticsearch'); @@ -75,7 +75,7 @@ subtest 'test_search' => sub { $search->mock('simple_search_compat', sub { my ( $self, $query ) = @_; - return ('unexpected query', undef, 0) unless $query eq '((author:(author)) AND ((title:(title\(s\))) OR (title:(speciäl))))'; + return ('unexpected query', undef, 0) unless $query eq '((author:(author)) AND ((title:(title\(s\))) OR (title:(speciäl))))' || $query eq "(simple search)"; my @records = ($marc_record_1, $marc_record_2); return (undef, \@records, 2); @@ -106,7 +106,7 @@ subtest 'test_search' => sub { my $rs = $Zconn->search_pqf('@and @attr 1=1 @attr 4=1 author @or @attr 1=4 title(s) @attr 1=4 speciäl'); is($Zconn->errcode(), 0, 'Search is successful: ' . $Zconn->errmsg()); - + is($rs->size(), 2, 'Two results returned'); my $returned1 = MARC::Record->new_from_xml($rs->record(0)->raw(), 'UTF-8'); @@ -117,6 +117,9 @@ subtest 'test_search' => sub { ok($returned2, 'Record 2 returned as MARCXML'); is($returned2->as_xml, $marc_record_2->as_xml, 'Record 2 returned properly'); + $rs = $Zconn->search_pqf('"simple search"'); + is($Zconn->errcode(), 0, 'Search is successful: ' . $Zconn->errmsg()); + # SRU protocol tests my $base = 'http://localhost:42111'; my $ns = 'http://www.loc.gov/zing/srw/'; -- 2.11.0