From 3d8e6d80f6d8be035cf5fbce28bc23fe55b604de Mon Sep 17 00:00:00 2001 From: Galen Charlton Date: Thu, 23 Oct 2008 16:07:19 -0500 Subject: [PATCH] bug 2682: followup - only do lc() on $op once Per suggestion by Joe Atzberger. Signed-off-by: Galen Charlton --- tags/review.pl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/tags/review.pl b/tags/review.pl index e8deec7d71..8bdfaa9861 100755 --- a/tags/review.pl +++ b/tags/review.pl @@ -93,15 +93,15 @@ $op = lc($input->param('op')) || 'none'; @tags = $input->param('tags'); $borrowernumber == 0 and push @errors, {op_zero=>1}; - if (lc($op) eq 'approve') { + if ($op eq 'approve') { foreach (@tags) { whitelist($borrowernumber,$_) or push @errors, {failed_ok=>$_}; } -} elsif (lc($op) eq 'reject' ) { +} elsif ($op eq 'reject' ) { foreach (@tags) { blacklist($borrowernumber,$_) or push @errors, {failed_rej=>$_}; } -} elsif (lc($op) eq 'test' ) { +} elsif ($op eq 'test' ) { my $tag = $input->param('test'); push @tags, $tag; my $check = is_approved($tag); @@ -205,7 +205,7 @@ $debug and print STDERR "number of approval_rows: " . scalar(@$tagloop) . "rows\ $template->param( DHTMLcalendar_dateformat => C4::Dates->DHTMLcalendar(), offset => $offset, # req'd for EXPR - op => lc($op), + op => $op, op_count => scalar(@tags), script_name => $script_name, approved => 0, # dummy value (also EXPR) -- 2.39.5