From ae546e3adefaf06279e4a380346a4a302acd869a Mon Sep 17 00:00:00 2001
From: Mason James <mtj@kohaaloha.com>
Date: Wed, 27 Jun 2012 01:08:34 +1200
Subject: [PATCH]  Bug 6679 - [SIGNED-OFF] fix 9 perlcritic violations in
 C4/TmplTokenType.pm

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

Signed-off-by: Jonathan Druart <jonathan.druart@biblibre.com>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>

Signed-off-by: Mark Tompsett <mtompset@hotmail.com>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>

Signed-off-by: Brendan A Gallagher <brendan@bywatersolutions.com>
---
 C4/TmplTokenType.pm | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/C4/TmplTokenType.pm b/C4/TmplTokenType.pm
index 4cf2268814..a08c718924 100644
--- a/C4/TmplTokenType.pm
+++ b/C4/TmplTokenType.pm
@@ -83,15 +83,15 @@ sub to_string {
     return $this->{'name'}
 }
 
-sub TEXT		() { $_text }
-sub TEXT_PARAMETRIZED	() { $_text_parametrized }
-sub CDATA		() { $_cdata }
-sub TAG			() { $_tag }
-sub DECL		() { $_decl }
-sub PI			() { $_pi }
-sub DIRECTIVE		() { $_directive }
-sub COMMENT		() { $_comment }
-sub UNKNOWN		() { $_unknown }
+sub TEXT		 { $_text }
+sub TEXT_PARAMETRIZED	 { $_text_parametrized }
+sub CDATA		 { $_cdata }
+sub TAG			 { $_tag }
+sub DECL		 { $_decl }
+sub PI			 { $_pi }
+sub DIRECTIVE		 { $_directive }
+sub COMMENT		 { $_comment }
+sub UNKNOWN		 { $_unknown }
 
 ###############################################################################
 
-- 
2.39.5