From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Sun, 8 Nov 2020 00:29:34 +0000 (-0800)
Subject: convert octal data to decimal to avoid perlcritic complaint
X-Git-Tag: 20201202~50
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=2fe5e72c61443460aeae55c1cd859eb2b9955d4f;p=perltidy.git

convert octal data to decimal to avoid perlcritic complaint
---

diff --git a/lib/Perl/Tidy/Tokenizer.pm b/lib/Perl/Tidy/Tokenizer.pm
index 0d267269..4f38ae56 100644
--- a/lib/Perl/Tidy/Tokenizer.pm
+++ b/lib/Perl/Tidy/Tokenizer.pm
@@ -8532,8 +8532,8 @@ BEGIN {
 
     # Hash of other possible line endings which may occur.
     # Keep these coordinated with the regex where this is used.
-    # Note: chr(015)="\r".
-    @q = ( chr(015), chr(035), chr(032) );
+    # Note: chr(13) = chr(015)="\r".
+    @q = ( chr(13), chr(29), chr(26) );
     @other_line_endings{@q} = (1) x scalar(@q);
 
     # These keywords are handled specially in the tokenizer code: