From d0bb27bf230fb06d4ad263574df811bb67d5d4a2 Mon Sep 17 00:00:00 2001
From: Chris Hall <chrish@catalyst.net.nz>
Date: Fri, 9 Dec 2011 11:04:19 +1300
Subject: [PATCH] Bug 5327: Patch removes unneeded self=shift from
 TTParser::unshift_token

Removed  unneeded self=shift from unshift_token
(as peek and next do not take a self, makes interface more consistent)

http://bugs.koha-community.org/show_bug.cgi?id=5327
Signed-off-by: Katrin Fischer <Katrin.Fischer.83@web.de>
Signed-off-by: Jared Camins-Esakov <jcamins@cpbibliography.com>
---
 C4/TTParser.pm | 1 -
 1 file changed, 1 deletion(-)

diff --git a/C4/TTParser.pm b/C4/TTParser.pm
index e088124684..2ea31a64e2 100755
--- a/C4/TTParser.pm
+++ b/C4/TTParser.pm
@@ -22,7 +22,6 @@ sub next_token{
 
 #unshift token back on @tokens
 sub unshift_token{
-    my $self = shift;
     unshift @tokens, shift;
 }
 
-- 
2.39.5