From 2a4debf309b5d6fee92e7e21f9b22688e8cd8f31 Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Wed, 24 Feb 2016 15:11:53 +0000 Subject: [PATCH] Bug 15900 - Remove use of recordpayment in ProcessOfflinePayment Test plan: 1) Apply this patch 2) prove t/db_dependent/Circulation.t Signed-off-by: Josef Moravec Signed-off-by: Jonathan Druart Signed-off-by: Kyle M Hall --- C4/Circulation.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/C4/Circulation.pm b/C4/Circulation.pm index 4d0e7d5798..470febcf33 100644 --- a/C4/Circulation.pm +++ b/C4/Circulation.pm @@ -44,6 +44,7 @@ use C4::RotatingCollections qw(GetCollectionItemBranches); use Algorithm::CheckDigits; use Data::Dumper; +use Koha::Account; use Koha::DateUtils; use Koha::Calendar; use Koha::Items; @@ -3835,10 +3836,10 @@ sub ProcessOfflineIssue { sub ProcessOfflinePayment { my $operation = shift; - my $borrower = C4::Members::GetMemberDetails( undef, $operation->{cardnumber} ); # Get borrower from operation cardnumber + my $patron = Koha::Borrowers->find( { cardnumber => $operation->{cardnumber} }); my $amount = $operation->{amount}; - recordpayment( $borrower->{borrowernumber}, $amount ); + Koha::Account->new( { patron_id => $patron->id } )->pay( { amount => $amount } ); return "Success." }