From 04745be7e2887ae2e1205d311841f20bd55edcf4 Mon Sep 17 00:00:00 2001 From: Emmi Date: Tue, 9 Jul 2019 09:24:30 +0300 Subject: [PATCH] Bug 23219: (QA Follow up) Cancel patrons holds when patron delete Adds test for patrons holds cancelation when patron is deleted. Test plan: Run t/db_dependent/Koha/Patrons.t Signed-off-by: Katrin Fischer Signed-off-by: Martin Renvoize --- t/db_dependent/Koha/Patrons.t | 5 ++++- 1 files changed, 4 insertions(+), 1 deletions(-) diff --git a/t/db_dependent/Koha/Patrons.t b/t/db_dependent/Koha/Patrons.t index 9d5de6b..b98037a 100644 --- a/t/db_dependent/Koha/Patrons.t +++ b/t/db_dependent/Koha/Patrons.t @@ -32,6 +32,7 @@ use C4::Biblio; use C4::Auth qw(checkpw_hash); use Koha::Holds; +use Koha::Old::Holds; use Koha::Patrons; use Koha::Patron::Categories; use Koha::Database; @@ -369,7 +370,7 @@ subtest "move_to_deleted" => sub { }; subtest "delete" => sub { - plan tests => 5; + plan tests => 6; t::lib::Mocks::mock_preference( 'BorrowersLog', 1 ); my $patron = $builder->build( { source => 'Borrower' } ); my $retrieved_patron = Koha::Patrons->find( $patron->{borrowernumber} ); @@ -389,6 +390,8 @@ subtest "delete" => sub { is( Koha::Patrons->find( $patron->{borrowernumber} ), undef, 'Koha::Patron->delete should have deleted the patron' ); + is (Koha::Old::Holds->search( { reserve_id => $hold->{ reserve_id } } )->count, 1, q|Koha::Patron->delete should have cancelled patron's holds| ); + is( Koha::Holds->search( { borrowernumber => $patron->{borrowernumber} } )->count, 0, q|Koha::Patron->delete should have deleted patron's holds| ); is( Koha::Virtualshelves->search( { owner => $patron->{borrowernumber} } )->count, 0, q|Koha::Patron->delete should have deleted patron's lists| ); -- 1.7.2.5