From 551ff49fca62d080de68a145fc5e243ab2c9d4d7 Mon Sep 17 00:00:00 2001
From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Sat, 5 Sep 2020 15:50:42 -0700
Subject: [PATCH] change to avoid perlcritic complaint

---
 lib/Perl/Tidy/Formatter.pm | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index 21b634c6..4596c002 100644
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -459,14 +459,16 @@ sub trim {
 }
 
 sub max {
-    my $max  = shift; 
-    for (@_) { $max = $_ > $max ? $_ : $max };
+    my (@vals) = @_;
+    my $max = shift @vals;
+    for (@vals) { $max = $_ > $max ? $_ : $max }
     return $max;
 }
 
 sub min {
-    my $min  = shift; 
-    for (@_) { $min = $_ < $min ? $_ : $min };
+    my (@vals) = @_;
+    my $min = shift @vals;
+    for (@vals) { $min = $_ < $min ? $_ : $min }
     return $min;
 }
 
-- 
2.39.5