From c52c023fa1a4a9f548bff6b832b0d283badcad41 Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Wed, 24 Feb 2016 15:25:04 +0000 Subject: [PATCH] Bug 15903 - Remove use of recordpayment in paycollect.pl Test Plan: 1) Apply this patch 2) Pay a fine via the "Pay amount" button 3) Payment should succeed. --- members/paycollect.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/members/paycollect.pl b/members/paycollect.pl index c68d205..c099b78 100755 --- a/members/paycollect.pl +++ b/members/paycollect.pl @@ -30,6 +30,7 @@ use C4::Accounts; use C4::Koha; use C4::Branch; use Koha::Patron::Images; +use Koha::Account; my $input = CGI->new(); @@ -127,11 +128,10 @@ if ( $total_paid and $total_paid ne '0.00' ) { recordpayment_selectaccts( $borrowernumber, $total_paid, \@acc, $note ); } else { my $note = $input->param('selected_accts_notes'); - recordpayment( $borrowernumber, $total_paid, '', $note ); + Koha::Account->new( { patron_id => $borrowernumber } ) + ->pay( { amount => $total_paid, note => $note } ); } -# recordpayment does not return success or failure so lets redisplay the boraccount - print $input->redirect( "/cgi-bin/koha/members/boraccount.pl?borrowernumber=$borrowernumber" ); -- 1.7.10.4