@@ -, +, @@ from TTParser::unshift_token --- C4/TTParser.pm | 1 - 1 files changed, 0 insertions(+), 1 deletions(-) --- a/C4/TTParser.pm +++ a/C4/TTParser.pm @@ -22,7 +22,6 @@ sub next_token{ #unshift token back on @tokens sub unshift_token{ - my $self = shift; unshift @tokens, shift; } --