From eef9355e8b1effcd21aa5473ef56eedeb11240e7 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 Signed-off-by: Sean McGarvey --- members/paycollect.pl | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/members/paycollect.pl b/members/paycollect.pl index 3c1e8aa201..e4dd2e44aa 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; @@ -166,11 +166,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)