View | Details | Raw Unified | Return to bug 25277
Collapse All | Expand All

(-)a/t/db_dependent/Koha/Z3950Responder/GenericSession.t (-4 / +6 lines)
Lines 23-29 our $child; Link Here
23
23
24
subtest 'test_search' => sub {
24
subtest 'test_search' => sub {
25
25
26
    plan tests => 19;
26
    plan tests => 20;
27
27
28
    t::lib::Mocks::mock_preference('SearchEngine', 'Elasticsearch');
28
    t::lib::Mocks::mock_preference('SearchEngine', 'Elasticsearch');
29
29
Lines 75-81 subtest 'test_search' => sub { Link Here
75
    $search->mock('simple_search_compat', sub {
75
    $search->mock('simple_search_compat', sub {
76
        my ( $self, $query ) = @_;
76
        my ( $self, $query ) = @_;
77
77
78
        return ('unexpected query', undef, 0) unless $query eq '((author:(author)) AND ((title:(title\(s\))) OR (title:(speciäl))))';
78
        return ('unexpected query', undef, 0) unless $query eq '((author:(author)) AND ((title:(title\(s\))) OR (title:(speciäl))))' || $query eq "(simple search)";
79
79
80
        my @records = ($marc_record_1, $marc_record_2);
80
        my @records = ($marc_record_1, $marc_record_2);
81
        return (undef, \@records, 2);
81
        return (undef, \@records, 2);
Lines 106-112 subtest 'test_search' => sub { Link Here
106
106
107
    my $rs = $Zconn->search_pqf('@and @attr 1=1 @attr 4=1 author @or @attr 1=4 title(s) @attr 1=4 speciäl');
107
    my $rs = $Zconn->search_pqf('@and @attr 1=1 @attr 4=1 author @or @attr 1=4 title(s) @attr 1=4 speciäl');
108
    is($Zconn->errcode(), 0, 'Search is successful: ' . $Zconn->errmsg());
108
    is($Zconn->errcode(), 0, 'Search is successful: ' . $Zconn->errmsg());
109
109
    
110
    is($rs->size(), 2, 'Two results returned');
110
    is($rs->size(), 2, 'Two results returned');
111
111
112
    my $returned1 = MARC::Record->new_from_xml($rs->record(0)->raw(), 'UTF-8');
112
    my $returned1 = MARC::Record->new_from_xml($rs->record(0)->raw(), 'UTF-8');
Lines 117-122 subtest 'test_search' => sub { Link Here
117
    ok($returned2, 'Record 2 returned as MARCXML');
117
    ok($returned2, 'Record 2 returned as MARCXML');
118
    is($returned2->as_xml, $marc_record_2->as_xml, 'Record 2 returned properly');
118
    is($returned2->as_xml, $marc_record_2->as_xml, 'Record 2 returned properly');
119
119
120
    $rs = $Zconn->search_pqf('"simple search"');
121
    is($Zconn->errcode(), 0, 'Search is successful: ' . $Zconn->errmsg());
122
120
    # SRU protocol tests
123
    # SRU protocol tests
121
    my $base = 'http://localhost:42111';
124
    my $base = 'http://localhost:42111';
122
    my $ns = 'http://www.loc.gov/zing/srw/';
125
    my $ns = 'http://www.loc.gov/zing/srw/';
123
- 

Return to bug 25277