Control: tags 1141463 + patch Control: tags 1141463 + pending
Dear maintainer, I've prepared an NMU for perltidy (versioned as 20250105-1.1) and uploaded it to DELAYED/7. Please feel free to tell me if I should cancel it. Regards. -- Niko Tyni [email protected]
diffstat for perltidy-20250105 perltidy-20250105 changelog | 8 + patches/merge-pull-request-191-from-jkeenanavoid.patch | 108 +++++++++++++++++ patches/series | 1 3 files changed, 117 insertions(+) diff -Nru perltidy-20250105/debian/changelog perltidy-20250105/debian/changelog --- perltidy-20250105/debian/changelog 2025-01-06 01:04:44.000000000 +0200 +++ perltidy-20250105/debian/changelog 2026-09-26 17:33:58.000000000 +0300 @@ -1,3 +1,11 @@ +perltidy (20250105-1.1) unstable; urgency=medium + + * Non-maintainer upload. + * Apply upstream fix suppressing whitescape escape warnings with + Perl 5.44. (Closes: #1141463) + + -- Niko Tyni <[email protected]> Sat, 26 Sep 2026 17:33:58 +0300 + perltidy (20250105-1) unstable; urgency=medium * New upstream release diff -Nru perltidy-20250105/debian/patches/merge-pull-request-191-from-jkeenanavoid.patch perltidy-20250105/debian/patches/merge-pull-request-191-from-jkeenanavoid.patch --- perltidy-20250105/debian/patches/merge-pull-request-191-from-jkeenanavoid.patch 1970-01-01 02:00:00.000000000 +0200 +++ perltidy-20250105/debian/patches/merge-pull-request-191-from-jkeenanavoid.patch 2026-09-26 17:33:58.000000000 +0300 @@ -0,0 +1,108 @@ +From: Steve Hancock <[email protected]> +Date: Wed, 10 Sep 2025 15:12:46 -0700 +X-Dgit-Generated: 20250105-1.1 5d52acd5a1ab4cc4da28f8cc0a9df7b8dbe8d5e1 +Subject: Merge pull request #191 from jkeenan/avoid-possible-attempt-to-escape-whitespace-warnings-20250910 + +Suppress 'Possible attempt to escape whitespace' warnings + +Bug-Debian: https://bugs.debian.org/1141463 +Origin: backport, https://github.com/perltidy/perltidy/pull/191 + +--- + +diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm +index 07c0b231..d2250c6b 100644 +--- a/lib/Perl/Tidy/Formatter.pm ++++ b/lib/Perl/Tidy/Formatter.pm +@@ -4084,7 +4084,10 @@ sub initialize_whitespace_hashes { + **= &&= ||= //= <=> A k f w F n C Y U G v P S ^^ + #; + +- my @spaces_left_side = qw< t ! ~ m p { \ h pp mm Z j >; ++ #my @spaces_left_side = qw< t ! ~ m p { \ h pp mm Z j >; ++ my @spaces_left_side = qw< t ! ~ m p { >; ++ push @spaces_left_side, "\\"; ++ push @spaces_left_side, qw< h pp mm Z j >; + push( @spaces_left_side, '#' ); # avoids warning message + + # c349: moved **= from @spaces_right_side to @spaces_both_sides +@@ -5095,8 +5098,9 @@ EOM + + # These are the only characters which can (currently) form special + # variables, like $^W: (issue c066, c068). +- @q = +- qw{ ? A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _ }; ++ @q = qw{ ? A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ }; ++ push @q, "\\"; ++ push @q, ( qw{ ] ^ _ } ); + @is_special_variable_char{@q} = (1) x scalar(@q); + + @q = qw( 0 1 2 3 4 5 6 7 8 9 ); +@@ -13129,7 +13133,11 @@ BEGIN { + .. :: << >> ** && .. || // -> => += -= .= %= &= |= ^= *= <> + ( ) <= >= == =~ !~ != ++ -- /= x= + ... **= <<= >>= &&= ||= //= <=> +- + - / * | % ! x ~ = \ ? : . < > ^ & ++ + - / * | % ! x ~ = ++ #; ++ push @q, "\\"; ++ push @q, qw# ++ ? : . < > ^ & + #; + push @q, ','; + @is_ascii_type{@q} = (1) x scalar(@q); +diff --git a/lib/Perl/Tidy/Tokenizer.pm b/lib/Perl/Tidy/Tokenizer.pm +index 4b7b9a4e..a6501e78 100644 +--- a/lib/Perl/Tidy/Tokenizer.pm ++++ b/lib/Perl/Tidy/Tokenizer.pm +@@ -6493,7 +6493,11 @@ BEGIN { + # after package NAMESPACE, so expecting TERM) + # Fix for c250: add new type 'S' for sub (not expecting operator) + my @q = qw# +- ; ! + x & ? F J - p / Y : % f U ~ A G j L P S * . | ^ < = [ m { \ > t ++ ; ! + x & ? F J - p / Y : % f U ~ A G j L P S * . | ^ < = [ m { ++ #; ++ push @q, "\\"; ++ push @q, qw# ++ > t + || >= != mm *= => .. !~ == && |= .= pp -= =~ += <= %= ^= x= ~~ ** << /= + &= // >> ~. &. |. ^. + ... **= <<= >>= &&= ||= //= <=> !~~ &.= |.= ^.= <<~ +@@ -8467,8 +8471,9 @@ sub do_scan_package { + + # These are the only characters which can (currently) form special + # variables, like $^W: (issue c066). +- my @q = +- qw{ ? A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _ }; ++ my @q = qw{ ? A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ }; ++ push @q, "\\"; ++ push @q, qw{ ] ^ _ }; + @is_special_variable_char{@q} = (1) x scalar(@q); + } ## end BEGIN + +@@ -11188,7 +11193,11 @@ BEGIN { + # fix for c250: added new token type 'P' and 'S' + my @valid_token_types = qw# + A b C G L R f h Q k t w i q n p m F pp mm U j J Y Z v P S +- { } ( ) [ ] ; + - / * | % ! x ~ = \ ? : . < > ^ & ++ { } ( ) [ ] ; + - / * | % ! x ~ = ++ #; ++ push @valid_token_types, "\\"; ++ push @valid_token_types, qw# ++ ? : . < > ^ & + #; + push( @valid_token_types, @digraphs ); + push( @valid_token_types, @trigraphs ); +@@ -11357,7 +11366,11 @@ BEGIN { + my @value_requestor_type = qw# + L { ( [ ~ !~ =~ ; . .. ... A : && ! || // = + - x + **= += -= .= /= *= %= x= &= |= ^= <<= >>= &&= ||= //= +- <= >= == != => \ > < % * / ? & | ** <=> ~~ !~~ <<~ ++ <= >= == != => ++ #; ++ push @value_requestor_type, "\\"; ++ push @value_requestor_type, qw# ++ > < % * / ? & | ** <=> ~~ !~~ <<~ + f F pp mm Y p m U J G j >> << ^ t + ~. ^. |. &. ^.= |.= &.= ^^ + #; diff -Nru perltidy-20250105/debian/patches/series perltidy-20250105/debian/patches/series --- perltidy-20250105/debian/patches/series 1970-01-01 02:00:00.000000000 +0200 +++ perltidy-20250105/debian/patches/series 2026-09-26 17:33:58.000000000 +0300 @@ -0,0 +1 @@ +merge-pull-request-191-from-jkeenanavoid.patch
