Lines 467-473
if ( $indexing_mode eq 'dom' ) {
Link Here
|
467 |
($error, $results_hashref, $facets_loop) = getRecords($query,$simple_query,[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
467 |
($error, $results_hashref, $facets_loop) = getRecords($query,$simple_query,[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
468 |
is($results_hashref->{biblioserver}->{hits}, 19, "getRecords generated keyword search for 'salud' matched right number of records"); |
468 |
is($results_hashref->{biblioserver}->{hits}, 19, "getRecords generated keyword search for 'salud' matched right number of records"); |
469 |
|
469 |
|
470 |
my @newresults = searchResults('opac', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 18, 0, 0, |
470 |
my @newresults = searchResults({'interface' => 'opac'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 18, 0, 0, |
471 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
471 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
472 |
is(scalar @newresults,18, "searchResults returns requested number of hits"); |
472 |
is(scalar @newresults,18, "searchResults returns requested number of hits"); |
473 |
|
473 |
|
Lines 549-555
if ( $indexing_mode eq 'dom' ) {
Link Here
|
549 |
($error, $results_hashref, $facets_loop) = getRecords($query,$simple_query,[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
549 |
($error, $results_hashref, $facets_loop) = getRecords($query,$simple_query,[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
550 |
is($results_hashref->{biblioserver}->{hits}, 26, "getRecords generated availability-limited search matched right number of records"); |
550 |
is($results_hashref->{biblioserver}->{hits}, 26, "getRecords generated availability-limited search matched right number of records"); |
551 |
|
551 |
|
552 |
@newresults = searchResults('opac', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
552 |
@newresults = searchResults({'interface'=>'opac'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
553 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
553 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
554 |
my $allavailable = 'true'; |
554 |
my $allavailable = 'true'; |
555 |
foreach my $result (@newresults) { |
555 |
foreach my $result (@newresults) { |
Lines 681-687
if ( $indexing_mode eq 'dom' ) {
Link Here
|
681 |
# Let's just test a few other bits and bobs, just for fun |
681 |
# Let's just test a few other bits and bobs, just for fun |
682 |
|
682 |
|
683 |
($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); |
683 |
($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); |
684 |
@newresults = searchResults('intranet', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
684 |
@newresults = searchResults({'interface'=>'intranet'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
685 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
685 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
686 |
is($newresults[0]->{'alternateholdings_count'}, 1, 'Alternate holdings filled in correctly'); |
686 |
is($newresults[0]->{'alternateholdings_count'}, 1, 'Alternate holdings filled in correctly'); |
687 |
|
687 |
|
Lines 700-706
if ( $indexing_mode eq 'dom' ) {
Link Here
|
700 |
}); |
700 |
}); |
701 |
|
701 |
|
702 |
($error, $results_hashref, $facets_loop) = getRecords("TEST12121212","TEST12121212",[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
702 |
($error, $results_hashref, $facets_loop) = getRecords("TEST12121212","TEST12121212",[ ], [ 'biblioserver' ],20,0,undef,\%branches,\%itemtypes,$query_type,0); |
703 |
@newresults = searchResults('intranet', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
703 |
@newresults = searchResults({'interface'=>'intranet'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 17, 0, 0, |
704 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
704 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
705 |
ok(!exists($newresults[0]->{norequests}), 'presence of a transit does not block hold request action (bug 10741)'); |
705 |
ok(!exists($newresults[0]->{norequests}), 'presence of a transit does not block hold request action (bug 10741)'); |
706 |
|
706 |
|
Lines 708-714
if ( $indexing_mode eq 'dom' ) {
Link Here
|
708 |
( undef, $results_hashref, $facets_loop ) = |
708 |
( undef, $results_hashref, $facets_loop ) = |
709 |
getRecords('ti:punctuation', 'punctuation', [], [ 'biblioserver' ], '19', 0, undef, \%branches, \%itemtypes, 'ccl', undef); |
709 |
getRecords('ti:punctuation', 'punctuation', [], [ 'biblioserver' ], '19', 0, undef, \%branches, \%itemtypes, 'ccl', undef); |
710 |
is($results_hashref->{biblioserver}->{hits}, 1, "search for ti:punctuation returned expected number of records"); |
710 |
is($results_hashref->{biblioserver}->{hits}, 1, "search for ti:punctuation returned expected number of records"); |
711 |
@newresults = searchResults('intranet', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 20, 0, 0, |
711 |
@newresults = searchResults({'interface' =>'intranet'} , $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 20, 0, 0, |
712 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
712 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
713 |
is(scalar(@newresults), 0, 'a record that cannot be parsed by MARC::Record is simply skipped (bug 10684)'); |
713 |
is(scalar(@newresults), 0, 'a record that cannot be parsed by MARC::Record is simply skipped (bug 10684)'); |
714 |
|
714 |
|
Lines 843-849
if ( $indexing_mode eq 'dom' ) {
Link Here
|
843 |
( undef, $results_hashref, $facets_loop ) = |
843 |
( undef, $results_hashref, $facets_loop ) = |
844 |
getRecords('ti:marc the large record', '', [], [ 'biblioserver' ], '20', 0, undef, \%branches, \%itemtypes, 'ccl', undef); |
844 |
getRecords('ti:marc the large record', '', [], [ 'biblioserver' ], '20', 0, undef, \%branches, \%itemtypes, 'ccl', undef); |
845 |
is($results_hashref->{biblioserver}->{hits}, 1, "Can do a search that retrieves an over-large bib record (bug 11096)"); |
845 |
is($results_hashref->{biblioserver}->{hits}, 1, "Can do a search that retrieves an over-large bib record (bug 11096)"); |
846 |
@newresults = searchResults('opac', $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 10, 0, 0, |
846 |
@newresults = searchResults({'interface' =>'opac'}, $query_desc, $results_hashref->{'biblioserver'}->{'hits'}, 10, 0, 0, |
847 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
847 |
$results_hashref->{'biblioserver'}->{"RECORDS"}); |
848 |
is($newresults[0]->{title}, 'Marc the Large Record', 'Able to render the title for over-large bib record (bug 11096)'); |
848 |
is($newresults[0]->{title}, 'Marc the Large Record', 'Able to render the title for over-large bib record (bug 11096)'); |
849 |
is($newresults[0]->{biblionumber}, '300', 'Over-large bib record has the correct biblionumber (bug 11096)'); |
849 |
is($newresults[0]->{biblionumber}, '300', 'Over-large bib record has the correct biblionumber (bug 11096)'); |
850 |
- |
|
|