From 8049d0a5528511af77f534d03a7f8056d4247a10 Mon Sep 17 00:00:00 2001 From: Nick Clemens Date: Fri, 12 Jun 2020 11:11:26 +0000 Subject: [PATCH] Bug 25724: Unit tests Signed-off-by: Andrew Fuerste-Henry Signed-off-by: Jason Robb Signed-off-by: Katrin Fischer --- t/db_dependent/Circulation/issue.t | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) diff --git a/t/db_dependent/Circulation/issue.t b/t/db_dependent/Circulation/issue.t index 36c56bb427..2a75da7de4 100644 --- a/t/db_dependent/Circulation/issue.t +++ b/t/db_dependent/Circulation/issue.t @@ -17,7 +17,7 @@ use Modern::Perl; -use Test::More tests => 45; +use Test::More tests => 46; use DateTime::Duration; use t::lib::Mocks; @@ -443,6 +443,16 @@ t::lib::Mocks::mock_preference( 'UpdateItemLocationOnCheckin', '_ALL_: CART' ); AddReturn( 'barcode_4', $branchcode_1 ); $item2 = Koha::Items->find( $itemnumber2 ); ok( $item2->location eq 'CART', q{UpdateItemLocationOnCheckin updates location value from 'GEN' with setting "_ALL_: CART"} ); +Koha::Item::Transfer->new({ + itemnumber => $itemnumber2, + frombranch => $branchcode_2, + tobranch => $branchcode_1, + datesent => '2020-01-01' +})->store; +AddReturn( 'barcode_4', $branchcode_1 ); +$item2 = Koha::Items->find( $itemnumber2 ); +ok( $item2->location eq 'CART', q{UpdateItemLocationOnCheckin updates location value from 'GEN' with setting "_ALL_: CART" when transfer filled} ); + ok( $item2->permanent_location eq 'GEN', q{UpdateItemLocationOnCheckin does not update permanent_location value from 'GEN' with setting "_ALL_: CART"} ); AddIssue( $borrower_1, 'barcode_4', $daysago10,0, $today, '' ); $item2 = Koha::Items->find( $itemnumber2 ); -- 2.11.0