Lines 558-571
subtest 'get_components_query' => sub {
Link Here
|
558 |
C4::Biblio::ModBiblio( $record, $biblio->biblionumber ); |
558 |
C4::Biblio::ModBiblio( $record, $biblio->biblionumber ); |
559 |
$biblio = Koha::Biblios->find( $biblio->biblionumber); |
559 |
$biblio = Koha::Biblios->find( $biblio->biblionumber); |
560 |
|
560 |
|
561 |
is($biblio->get_components_query, "rcn:$biblionumber AND (bib-level:a OR bib-level:b)", "UseControlNumber enabled without MarcOrgCode"); |
561 |
is($biblio->get_components_query, "(rcn:$biblionumber AND (bib-level:a OR bib-level:b))", "UseControlNumber enabled without MarcOrgCode"); |
562 |
|
562 |
|
563 |
my $marc_003_field = MARC::Field->new('003', 'OSt'); |
563 |
my $marc_003_field = MARC::Field->new('003', 'OSt'); |
564 |
$record->append_fields($marc_003_field); |
564 |
$record->append_fields($marc_003_field); |
565 |
C4::Biblio::ModBiblio( $record, $biblio->biblionumber ); |
565 |
C4::Biblio::ModBiblio( $record, $biblio->biblionumber ); |
566 |
$biblio = Koha::Biblios->find( $biblio->biblionumber); |
566 |
$biblio = Koha::Biblios->find( $biblio->biblionumber); |
567 |
|
567 |
|
568 |
is($biblio->get_components_query, "((rcn:$biblionumber AND cni:OSt) OR rcn:OSt $biblionumber) AND (bib-level:a OR bib-level:b)", "UseControlNumber enabled with MarcOrgCode"); |
568 |
is($biblio->get_components_query, "(((rcn:$biblionumber AND cni:OSt) OR rcn:\"OSt $biblionumber\") AND (bib-level:a OR bib-level:b))", "UseControlNumber enabled with MarcOrgCode"); |
569 |
}; |
569 |
}; |
570 |
|
570 |
|
571 |
subtest 'orders() and active_orders() tests' => sub { |
571 |
subtest 'orders() and active_orders() tests' => sub { |
572 |
- |
|
|