View | Details | Raw Unified | Return to bug 15907
Collapse All | Expand All

(-)a/opac/opac-account-pay-paypal-return.pl (-11 / +13 lines)
Lines 94-109 if ( $response->is_success ) { Link Here
94
        $amount = $params{PAYMENTINFO_0_AMT};
94
        $amount = $params{PAYMENTINFO_0_AMT};
95
95
96
        my $account = Koha::Account->new( { patron_id => $borrowernumber } );
96
        my $account = Koha::Account->new( { patron_id => $borrowernumber } );
97
        foreach my $accountlines_id (@accountlines) {
97
        my @lines = Koha::Account::Lines->search(
98
            my $line = Koha::Account::Lines->find($accountlines_id);
98
            {
99
            $account->pay(
99
                accountlines_id => { -in => \@accountlines }
100
                {
100
            }
101
                    amount => $amount,
101
        );
102
                    lines  => [$line],
102
103
                    note   => 'PayPal'
103
        $account->pay(
104
                }
104
            {
105
            );
105
                amount => $amount,
106
        }
106
                lines  => \@lines,
107
                note   => 'PayPal'
108
            }
109
        );
107
    }
110
    }
108
    else {
111
    else {
109
       $error = "PAYPAL_ERROR_PROCESSING";
112
       $error = "PAYPAL_ERROR_PROCESSING";
110
- 

Return to bug 15907