Lines 417-423
if ( $indexing_mode eq 'dom' ) {
Link Here
|
417 |
($error, $results_hashref, $facets_loop) = getRecords($query,$simple_query,[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
417 |
($error, $results_hashref, $facets_loop) = getRecords($query,$simple_query,[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
418 |
is($results_hashref->{biblioserver}->{hits}, 19, "getRecords generated keyword search for 'salud' matched right number of records"); |
418 |
is($results_hashref->{biblioserver}->{hits}, 19, "getRecords generated keyword search for 'salud' matched right number of records"); |
419 |
|
419 |
|
420 |
my @newresults = searchResults('opac', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 18, 0, 0, |
420 |
my @newresults = searchResults({'interface' => 'opac'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 18, 0, 0, |
421 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
421 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
422 |
is(scalar @newresults,18, "searchResults returns requested number of hits"); |
422 |
is(scalar @newresults,18, "searchResults returns requested number of hits"); |
423 |
|
423 |
|
Lines 499-505
if ( $indexing_mode eq 'dom' ) {
Link Here
|
499 |
($error, $results_hashref, $facets_loop) = getRecords($query,$simple_query,[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
499 |
($error, $results_hashref, $facets_loop) = getRecords($query,$simple_query,[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
500 |
is($results_hashref->{biblioserver}->{hits}, 26, "getRecords generated availability-limited search matched right number of records"); |
500 |
is($results_hashref->{biblioserver}->{hits}, 26, "getRecords generated availability-limited search matched right number of records"); |
501 |
|
501 |
|
502 |
@newresults = searchResults('opac', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
502 |
@newresults = searchResults({'interface'=>'opac'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
503 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
503 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
504 |
my $allavailable = 'true'; |
504 |
my $allavailable = 'true'; |
505 |
foreach my $result (@newresults) { |
505 |
foreach my $result (@newresults) { |
Lines 637-643
if ( $indexing_mode eq 'dom' ) {
Link Here
|
637 |
# Let's just test a few other bits and bobs, just for fun |
637 |
# Let's just test a few other bits and bobs, just for fun |
638 |
|
638 |
|
639 |
($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); |
639 |
($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); |
640 |
@newresults = searchResults('intranet', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
640 |
@newresults = searchResults({'interface'=>'intranet'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
641 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
641 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
642 |
is($newresults[0]->{'alternateholdings_count'}, 1, 'Alternate holdings filled in correctly'); |
642 |
is($newresults[0]->{'alternateholdings_count'}, 1, 'Alternate holdings filled in correctly'); |
643 |
|
643 |
|
Lines 656-662
if ( $indexing_mode eq 'dom' ) {
Link Here
|
656 |
}); |
656 |
}); |
657 |
|
657 |
|
658 |
($error, $results_hashref, $facets_loop) = getRecords("TEST12121212","TEST12121212",[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
658 |
($error, $results_hashref, $facets_loop) = getRecords("TEST12121212","TEST12121212",[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
659 |
@newresults = searchResults('intranet', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
659 |
@newresults = searchResults({'interface'=>'intranet'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
660 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
660 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
661 |
ok(!exists($newresults[0]->{norequests}), 'presence of a transit does not block hold request action (bug 10741)'); |
661 |
ok(!exists($newresults[0]->{norequests}), 'presence of a transit does not block hold request action (bug 10741)'); |
662 |
|
662 |
|
Lines 664-670
if ( $indexing_mode eq 'dom' ) {
Link Here
|
664 |
( undef, $results_hashref, $facets_loop ) = |
664 |
( undef, $results_hashref, $facets_loop ) = |
665 |
getRecords('ti:punctuation', 'punctuation', [], [ 'biblioserver' ], '19', 0, undef, \%branches, \%itemtypes, 'ccl', undef); |
665 |
getRecords('ti:punctuation', 'punctuation', [], [ 'biblioserver' ], '19', 0, undef, \%branches, \%itemtypes, 'ccl', undef); |
666 |
is($results_hashref->{biblioserver}->{hits}, 1, "search for ti:punctuation returned expected number of records"); |
666 |
is($results_hashref->{biblioserver}->{hits}, 1, "search for ti:punctuation returned expected number of records"); |
667 |
warning_like { @newresults = searchResults('intranet', $query_desc, |
667 |
warning_like { @newresults = searchResults({'intranet' => 'intranet'}, $query_desc, |
668 |
$results_hashref->{'biblioserver'}->{'hits'}, 20, 0, 0, |
668 |
$results_hashref->{'biblioserver'}->{'hits'}, 20, 0, 0, |
669 |
$results_hashref->{'biblioserver'}->{"RECORDS"}) } |
669 |
$results_hashref->{'biblioserver'}->{"RECORDS"}) } |
670 |
qr/^ERROR DECODING RECORD - Tag "50%" is not a valid tag/, |
670 |
qr/^ERROR DECODING RECORD - Tag "50%" is not a valid tag/, |
Lines 802-808
if ( $indexing_mode eq 'dom' ) {
Link Here
|
802 |
( undef, $results_hashref, $facets_loop ) = |
802 |
( undef, $results_hashref, $facets_loop ) = |
803 |
getRecords('ti:marc the large record', '', [], [ 'biblioserver' ], '20', 0, undef, \%branches, \%itemtypes, 'ccl', undef); |
803 |
getRecords('ti:marc the large record', '', [], [ 'biblioserver' ], '20', 0, undef, \%branches, \%itemtypes, 'ccl', undef); |
804 |
is($results_hashref->{biblioserver}->{hits}, 1, "Can do a search that retrieves an over-large bib record (bug 11096)"); |
804 |
is($results_hashref->{biblioserver}->{hits}, 1, "Can do a search that retrieves an over-large bib record (bug 11096)"); |
805 |
@newresults = searchResults('opac', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 10, 0, 0, |
805 |
@newresults = searchResults({'interface' =>'opac'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 10, 0, 0, |
806 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
806 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
807 |
is($newresults[0]->{title}, 'Marc the Large Record', 'Able to render the title for over-large bib record (bug 11096)'); |
807 |
is($newresults[0]->{title}, 'Marc the Large Record', 'Able to render the title for over-large bib record (bug 11096)'); |
808 |
is($newresults[0]->{biblionumber}, '300', 'Over-large bib record has the correct biblionumber (bug 11096)'); |
808 |
is($newresults[0]->{biblionumber}, '300', 'Over-large bib record has the correct biblionumber (bug 11096)'); |
809 |
- |
|
|