From 9392110e41ff58bf9e25365912cf94da252edf61 Mon Sep 17 00:00:00 2001
From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Thu, 13 Aug 2020 07:14:09 -0700
Subject: [PATCH] minor coding cleanup

---
 lib/Perl/Tidy/Tokenizer.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Perl/Tidy/Tokenizer.pm b/lib/Perl/Tidy/Tokenizer.pm
index d1b63a10..d329620f 100644
--- a/lib/Perl/Tidy/Tokenizer.pm
+++ b/lib/Perl/Tidy/Tokenizer.pm
@@ -367,7 +367,7 @@ sub get_saw_brace_error {
 }
 
 sub get_unexpected_error_count {
-    my ($self) = shift;
+    my ($self) = @_;
     return $self->{_unexpected_error_count};
 }
 
-- 
2.39.5