From 22f3a5de8feede3fe05b82db4389677ded165ea3 Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Wed, 9 Oct 2019 12:43:54 -0400 Subject: [PATCH] Bug 23788: Rename $select to $selected_accts --- members/paycollect.pl | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/members/paycollect.pl b/members/paycollect.pl index 9e25476a0d..25b6652618 100755 --- a/members/paycollect.pl +++ b/members/paycollect.pl @@ -71,7 +71,7 @@ my $total_paid = $input->param('paid'); my $select_lines = $input->param('selected'); my $pay_individual = $input->param('pay_individual'); -my $select = $input->param('selected_accts'); +my $selected_accts = $input->param('selected_accts'); my $payment_note = uri_unescape scalar $input->param('payment_note'); my $payment_type = scalar $input->param('payment_type'); my $accountlines_id; @@ -165,11 +165,11 @@ if ( $total_paid and $total_paid ne '0.00' ) { print $input->redirect( "/cgi-bin/koha/members/pay.pl?borrowernumber=$borrowernumber&payment_id=$payment_id&change_given=$change_given"); } else { - if ($select) { - if ( $select =~ /^([\d,]*).*/ ) { - $select = $1; # ensure passing no junk + if ($selected_accts) { + if ( $selected_accts =~ /^([\d,]*).*/ ) { + $selected_accts = $1; # ensure passing no junk } - my @acc = split /,/, $select; + my @acc = split /,/, $selected_accts; my $note = $input->param('selected_accts_notes'); my @lines = Koha::Account::Lines->search( -- 2.21.0 (Apple Git-122)