From 0760a4b9889ec7c5b1f7b33e70e41ca30812f838 Mon Sep 17 00:00:00 2001
From: Mason James <mtj@kohaaloha.com>
Date: Wed, 27 Jun 2012 04:57:58 +1200
Subject: [PATCH] Bug 6679 - [SIGNED-OFF] fix 2 perlcritic violations in
 C4/Utils.pm

Subroutine prototypes used at line 38, column 1.  See page 194 of PBP.  (Severity: 5)

Subroutine prototypes used at line 43, column 1.  See page 194 of PBP.  (Severity: 5)

Signed-off-by: Jonathan Druart <jonathan.druart@biblibre.com>
Signed-off-by: Paul Poulain <paul.poulain@biblibre.com>
---
 C4/Utils.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/C4/Utils.pm b/C4/Utils.pm
index 31d50eb331..dac9423073 100644
--- a/C4/Utils.pm
+++ b/C4/Utils.pm
@@ -35,12 +35,12 @@ BEGIN {
 }
 
 
-sub maxwidth (@) {
+sub maxwidth {
 	(@_) or return 0;
 	return (sort {$a <=> $b} map {length} @_)[-1];
 }
 
-sub hashdump ($$) {
+sub hashdump {
 	my $pre = shift;
 	my $val  = shift;
 	if (ref($val) =~ /HASH/) {
-- 
2.39.5