diff --git a/t/db_dependent/ILSDI_Services.t b/t/db_dependent/ILSDI_Services.t index 0a75e7dd74..1c3e759b24 100755 --- a/t/db_dependent/ILSDI_Services.t +++ b/t/db_dependent/ILSDI_Services.t @@ -34,6 +34,8 @@ use C4::Reserves qw (AddReserve ModReserve ModReserveAffect ModReserveStatus) use Koha::AuthUtils; use Koha::DateUtils qw( dt_from_string ); +use Koha::MarcSubfieldStructures; + BEGIN { use_ok( 'C4::ILSDI::Services', @@ -800,7 +802,7 @@ subtest 'Holds test with start_date and end_date' => sub { subtest 'GetRecords' => sub { - plan tests => 10; + plan tests => 11; $schema->storage->txn_begin; @@ -817,12 +819,24 @@ subtest 'GetRecords' => sub { } ); - my $item = $builder->build_sample_item( + my $biblio = $builder->build_sample_biblio( { - library => $branch1->{branchcode}, + title => 'This is an awesome title', } ); + my $item = $builder->build_sample_item( + { + biblionumber => $biblio->biblionumber, + library => $branch1->{branchcode}, + } + ); + + my $framework_f245a = Koha::MarcSubfieldStructures->find( + { frameworkcode => $biblio->frameworkcode, tagfield => "245", tagsubfield => "a" } ); + $framework_f245a->hidden('8'); + $framework_f245a->store(); + my $patron = $builder->build( { source => 'Borrower', @@ -855,6 +869,10 @@ subtest 'GetRecords' => sub { my $reply = C4::ILSDI::Services::GetRecords($cgi); + my $opac_marcxml = $reply->{record}->[0]->{marcxml}; + my @title_matches = ( $opac_marcxml =~ m/This is an awesome title/g ); + is( scalar @title_matches, 0, 'Title hidden in output as expected' ); + my $transfer = $item->get_transfer; my $expected = { datesent => $transfer->datesent,