Lines 430-436
if ( $indexing_mode eq 'dom' ) {
Link Here
|
430 |
($error, $results_hashref, $facets_loop) = getRecords($query,$simple_query,[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
430 |
($error, $results_hashref, $facets_loop) = getRecords($query,$simple_query,[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
431 |
is($results_hashref->{biblioserver}->{hits}, 19, "getRecords generated keyword search for 'salud' matched right number of records"); |
431 |
is($results_hashref->{biblioserver}->{hits}, 19, "getRecords generated keyword search for 'salud' matched right number of records"); |
432 |
|
432 |
|
433 |
my @newresults = searchResults('opac', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 18, 0, 0, |
433 |
my @newresults = searchResults({'interface' => 'opac'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 18, 0, 0, |
434 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
434 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
435 |
is(scalar @newresults,18, "searchResults returns requested number of hits"); |
435 |
is(scalar @newresults,18, "searchResults returns requested number of hits"); |
436 |
|
436 |
|
Lines 512-518
if ( $indexing_mode eq 'dom' ) {
Link Here
|
512 |
($error, $results_hashref, $facets_loop) = getRecords($query,$simple_query,[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
512 |
($error, $results_hashref, $facets_loop) = getRecords($query,$simple_query,[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
513 |
is($results_hashref->{biblioserver}->{hits}, 26, "getRecords generated availability-limited search matched right number of records"); |
513 |
is($results_hashref->{biblioserver}->{hits}, 26, "getRecords generated availability-limited search matched right number of records"); |
514 |
|
514 |
|
515 |
@newresults = searchResults('opac', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
515 |
@newresults = searchResults({'interface'=>'opac'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
516 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
516 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
517 |
my $allavailable = 'true'; |
517 |
my $allavailable = 'true'; |
518 |
foreach my $result (@newresults) { |
518 |
foreach my $result (@newresults) { |
Lines 644-650
if ( $indexing_mode eq 'dom' ) {
Link Here
|
644 |
# Let's just test a few other bits and bobs, just for fun |
644 |
# Let's just test a few other bits and bobs, just for fun |
645 |
|
645 |
|
646 |
($error, $results_hashref, $facets_loop) = getRecords("Godzina pąsowej róży","Godzina pąsowej róży",[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
646 |
($error, $results_hashref, $facets_loop) = getRecords("Godzina pąsowej róży","Godzina pąsowej róży",[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
647 |
@newresults = searchResults('intranet', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
647 |
@newresults = searchResults({'interface'=>'intranet'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
648 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
648 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
649 |
is($newresults[0]->{'alternateholdings_count'}, 1, 'Alternate holdings filled in correctly'); |
649 |
is($newresults[0]->{'alternateholdings_count'}, 1, 'Alternate holdings filled in correctly'); |
650 |
|
650 |
|
Lines 663-669
if ( $indexing_mode eq 'dom' ) {
Link Here
|
663 |
}); |
663 |
}); |
664 |
|
664 |
|
665 |
($error, $results_hashref, $facets_loop) = getRecords("TEST12121212","TEST12121212",[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
665 |
($error, $results_hashref, $facets_loop) = getRecords("TEST12121212","TEST12121212",[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
666 |
@newresults = searchResults('intranet', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
666 |
@newresults = searchResults({'interface'=>'intranet'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
667 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
667 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
668 |
ok(!exists($newresults[0]->{norequests}), 'presence of a transit does not block hold request action (bug 10741)'); |
668 |
ok(!exists($newresults[0]->{norequests}), 'presence of a transit does not block hold request action (bug 10741)'); |
669 |
|
669 |
|
Lines 671-677
if ( $indexing_mode eq 'dom' ) {
Link Here
|
671 |
( undef, $results_hashref, $facets_loop ) = |
671 |
( undef, $results_hashref, $facets_loop ) = |
672 |
getRecords('ti:punctuation', 'punctuation', [], [ 'biblioserver' ], '19', 0, undef, \%branches, \%itemtypes, 'ccl', undef); |
672 |
getRecords('ti:punctuation', 'punctuation', [], [ 'biblioserver' ], '19', 0, undef, \%branches, \%itemtypes, 'ccl', undef); |
673 |
is($results_hashref->{biblioserver}->{hits}, 1, "search for ti:punctuation returned expected number of records"); |
673 |
is($results_hashref->{biblioserver}->{hits}, 1, "search for ti:punctuation returned expected number of records"); |
674 |
warning_like { @newresults = searchResults('intranet', $query_desc, |
674 |
warning_like { @newresults = searchResults({'intranet' => 'intranet'}, $query_desc, |
675 |
$results_hashref->{'biblioserver'}->{'hits'}, 20, 0, 0, |
675 |
$results_hashref->{'biblioserver'}->{'hits'}, 20, 0, 0, |
676 |
$results_hashref->{'biblioserver'}->{"RECORDS"}) } |
676 |
$results_hashref->{'biblioserver'}->{"RECORDS"}) } |
677 |
qr/^ERROR DECODING RECORD - Tag "50%" is not a valid tag/, |
677 |
qr/^ERROR DECODING RECORD - Tag "50%" is not a valid tag/, |
Lines 809-815
if ( $indexing_mode eq 'dom' ) {
Link Here
|
809 |
( undef, $results_hashref, $facets_loop ) = |
809 |
( undef, $results_hashref, $facets_loop ) = |
810 |
getRecords('ti:marc the large record', '', [], [ 'biblioserver' ], '20', 0, undef, \%branches, \%itemtypes, 'ccl', undef); |
810 |
getRecords('ti:marc the large record', '', [], [ 'biblioserver' ], '20', 0, undef, \%branches, \%itemtypes, 'ccl', undef); |
811 |
is($results_hashref->{biblioserver}->{hits}, 1, "Can do a search that retrieves an over-large bib record (bug 11096)"); |
811 |
is($results_hashref->{biblioserver}->{hits}, 1, "Can do a search that retrieves an over-large bib record (bug 11096)"); |
812 |
@newresults = searchResults('opac', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 10, 0, 0, |
812 |
@newresults = searchResults({'interface' =>'opac'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 10, 0, 0, |
813 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
813 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
814 |
is($newresults[0]->{title}, 'Marc the Large Record', 'Able to render the title for over-large bib record (bug 11096)'); |
814 |
is($newresults[0]->{title}, 'Marc the Large Record', 'Able to render the title for over-large bib record (bug 11096)'); |
815 |
is($newresults[0]->{biblionumber}, '300', 'Over-large bib record has the correct biblionumber (bug 11096)'); |
815 |
is($newresults[0]->{biblionumber}, '300', 'Over-large bib record has the correct biblionumber (bug 11096)'); |
816 |
- |
|
|