From 0a02d803c6f9cc4b794222e39a8ced3cefa3bb54 Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Wed, 24 Feb 2016 15:56:52 +0000 Subject: [PATCH] Bug 15907 - Remove use of makepayment in opac/opac-account-pay-paypal-return.pl Test Plan: 1) Apply this patch 2) Make a payment via PayPal in sandbox mode 3) Note the payment succeeds --- opac/opac-account-pay-paypal-return.pl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/opac/opac-account-pay-paypal-return.pl b/opac/opac-account-pay-paypal-return.pl index 742f5ae..3298618 100755 --- a/opac/opac-account-pay-paypal-return.pl +++ b/opac/opac-account-pay-paypal-return.pl @@ -93,10 +93,10 @@ if ( $response->is_success ) { if ( $params{ACK} eq "Success" ) { $amount = $params{PAYMENTINFO_0_AMT}; - my $accountlines_rs = Koha::Database->new()->schema()->resultset('Accountline'); - foreach my $accountlines_id ( @accountlines ) { - my $accountline = $accountlines_rs->find( $accountlines_id ); - makepayment( $accountlines_id, $borrowernumber, undef, $accountline->amountoutstanding, undef, undef, 'PayPal' ); + my $account = Koha::Account->new( { patron_id => $borrowernumber } ); + foreach my $accountlines_id (@accountlines) { + my $line = Koha::Account::Lines->find($accountlines_id); + $account->pay( { lines => [$line], note => 'PayPal' } ); } } else { -- 1.7.10.4