From faf9fd64d563e20a68697c6ee0bac52b0a64980f Mon Sep 17 00:00:00 2001 From: Steve Hancock Date: Sat, 22 Jun 2019 08:16:50 -0700 Subject: [PATCH] fixed RT#129850; change binary whitespace rule Please enter the commit message for your changes. Lines starting --- CHANGES.md | 8 ++++++++ lib/Perl/Tidy/Formatter.pm | 2 +- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/CHANGES.md b/CHANGES.md index 57599740..2d4c0f27 100644 --- a/CHANGES.md +++ b/CHANGES.md @@ -2,6 +2,14 @@ ## 2019 06 01.01 + - fixed for RT#129850; concerning a space between a closing block brace and + opening bracket or brace, as occurs before the '[' in this line: + + my @addunix = map { File::Spec::Unix->catfile( @ROOT, @$_ ) } ['b']; + + Formerly, any space was removed. Now it is optional, and the output will + follow the input. + - fixed issue git#13, needless trailing whitespace in error message - fixed issue git#9: if the -ce (--cuddled-else) flag is used, diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm index 0fa94037..6d342c0e 100644 --- a/lib/Perl/Tidy/Formatter.pm +++ b/lib/Perl/Tidy/Formatter.pm @@ -1849,7 +1849,7 @@ sub initialize_whitespace_hashes { $binary_ws_rules{'t'}{'L'} = WS_NO; $binary_ws_rules{'t'}{'{'} = WS_NO; $binary_ws_rules{'}'}{'L'} = WS_NO; - $binary_ws_rules{'}'}{'{'} = WS_NO; + $binary_ws_rules{'}'}{'{'} = WS_OPTIONAL; # RT#129850; was WS_NO $binary_ws_rules{'$'}{'L'} = WS_NO; $binary_ws_rules{'$'}{'{'} = WS_NO; $binary_ws_rules{'@'}{'L'} = WS_NO; -- 2.39.5