convert octal data to decimal to avoid perlcritic complaint

diff --git a/lib/Perl/Tidy/Tokenizer.pm b/lib/Perl/Tidy/Tokenizer.pm
index 0d267269e25f35a970ed902e4a23169be3b9bedb..4f38ae5600239956b8d3162ac6718c7ec0a8fd37 100644 (file)
--- 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: