From 971c65c3195a0797cf099d217cd1955a789c6606 Mon Sep 17 00:00:00 2001 From: Nick Clemens Date: Fri, 14 Jan 2022 19:59:07 +0000 Subject: [PATCH] Bug 29719: Unit tests --- t/db_dependent/Items.t | 20 +++++++++++++++++++- 1 file changed, 19 insertions(+), 1 deletion(-) diff --git a/t/db_dependent/Items.t b/t/db_dependent/Items.t index 120d9b9307..16d71a4cee 100755 --- a/t/db_dependent/Items.t +++ b/t/db_dependent/Items.t @@ -981,7 +981,7 @@ subtest 'Split subfields in Item2Marc (Bug 21774)' => sub { }; subtest 'ModItemFromMarc' => sub { - plan tests => 6; + plan tests => 7; $schema->storage->txn_begin; my $builder = t::lib::TestBuilder->new; @@ -1037,6 +1037,24 @@ subtest 'ModItemFromMarc' => sub { is( $item->get_from_storage->cn_sort, 'YYY', 'cn_sort has been updated' ); }; + subtest 'onloan' => sub { + plan tests => 3; + + my $item = $builder->build_sample_item; + $item->set({ onloan => '2022-03-19' })->store; + is( $item->onloan, '2022-03-19', 'init values set are expected' ); + + my $marc = C4::Items::Item2Marc( $item->get_from_storage->unblessed, $item->biblionumber ); + my ( $MARCfield, $MARCsubfield ) = GetMarcFromKohaField( 'items.onloan' ); + $marc->field($MARCfield)->delete_subfield( code => $MARCsubfield ); + ModItemFromMarc( $marc, $item->biblionumber, $item->itemnumber ); + is( $item->get_from_storage->onloan, '2022-03-19', 'onloan has not been updated if not passed' ); + + $marc = C4::Items::Item2Marc( { %{$item->unblessed}, onloan => '2022-03-26' }, $item->biblionumber ); + ModItemFromMarc( $marc, $item->biblionumber, $item->itemnumber ); + is( $item->get_from_storage->onloan, '2022-03-26', 'onloan has been updated when passed in' ); + }; + subtest 'permanent_location' => sub { plan tests => 10; -- 2.30.2