From 15847450be2622937356be2a97ffb20d8af04466 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
Content-Type: text/plain; charset="UTF-8"

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 files changed, 0 insertions(+), 1 deletions(-)

diff --git a/C4/TTParser.pm b/C4/TTParser.pm
index e088124..2ea31a6 100644
--- 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;
 }
 
-- 
1.7.2.5