Bug 21801: (follow-up) Use ->account

This patch is a minor refactoring, that reuses the $account object we
already get from $patron, instead of creating new ones all over the
place. Code gets simpler to read too.

Signed-off-by: Mark Tompsett <mtompset@hotmail.com>
Signed-off-by: Josef Moravec <josef.moravec@gmail.com>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
This commit is contained in:
Tomas Cohen Arazi 2018-11-09 11:58:10 -03:00 committed by Martin Renvoize
parent 9bdd6a0990
commit 0f83de1669
No known key found for this signature in database
GPG Key ID: 422B469130441A0F
1 changed files with 9 additions and 12 deletions

View File

@ -57,11 +57,12 @@ my $patron = Koha::Patrons->find( $borrowernumber );
output_and_exit_if_error( $input, $cookie, $template, { module => 'members', logged_in_user => $logged_in_user, current_patron => $patron } );
my $borrower = $patron->unblessed;
my $account = $patron->account;
my $category = $patron->category;
my $user = $input->remote_user;
my $branch = C4::Context->userenv->{'branch'};
my $total_due = $patron->account->outstanding_debits->total_outstanding;
my $library_id = C4::Context->userenv->{'branch'};
my $total_due = $account->outstanding_debits->total_outstanding;
my $total_paid = $input->param('paid');
@ -120,11 +121,11 @@ if ( $total_paid and $total_paid ne '0.00' ) {
if ($pay_individual) {
my $line = Koha::Account::Lines->find($accountlines_id);
Koha::Account->new( { patron_id => $borrowernumber } )->pay(
$account->pay(
{
lines => [$line],
amount => $total_paid,
library_id => $branch,
library_id => $library_id,
note => $payment_note,
interface => C4::Context->interface,
payment_type => $payment_type,
@ -149,15 +150,11 @@ if ( $total_paid and $total_paid ne '0.00' ) {
{ order_by => 'date' }
);
Koha::Account->new(
{
patron_id => $borrowernumber,
}
)->pay(
$account->pay(
{
type => $type,
amount => $total_paid,
library_id => $branch,
library_id => $library_id,
lines => \@lines,
note => $note,
interface => C4::Context->interface,
@ -167,10 +164,10 @@ if ( $total_paid and $total_paid ne '0.00' ) {
}
else {
my $note = $input->param('selected_accts_notes');
Koha::Account->new( { patron_id => $borrowernumber } )->pay(
$account->pay(
{
amount => $total_paid,
library_id => $branch,
library_id => $library_id,
note => $note,
payment_type => $payment_type,
interface => C4::Context->interface