From 6fcfeb511a1d4895d2b064c4ed0850f1b1340513 Mon Sep 17 00:00:00 2001 From: Steve Hancock Date: Sun, 2 Jun 2019 13:38:51 -0700 Subject: [PATCH] removed restriction on '=~' as alignment token --- lib/Perl/Tidy/Formatter.pm | 27 ++++++++++++++------------- 1 file changed, 14 insertions(+), 13 deletions(-) diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm index 0d30a348..c1314a33 100644 --- a/lib/Perl/Tidy/Formatter.pm +++ b/lib/Perl/Tidy/Formatter.pm @@ -11535,19 +11535,20 @@ sub get_seqno { $alignment_type = $vert_last_nonblank_type; } - #-------------------------------------------------------- - # patch for =~ operator. We only align this if it - # is the first operator in a line, and the line is a simple - # statement. Aligning them within a statement - # interferes could interfere with other good alignments. - #-------------------------------------------------------- - if ( $alignment_type eq '=~' ) { - my $terminal_type = $types_to_go[$i_terminal]; - if ( $count > 0 || $max_line > 0 || $terminal_type ne ';' ) - { - $alignment_type = ""; - } - } +## #-------------------------------------------------------- +## # DEACTIVATED; DOES NOT SEEM NEEDED WITH NEW VERTICAL ALIGNER +## # patch for =~ operator. We only align this if it +## # is the first operator in a line, and the line is a simple +## # statement. Aligning them within a statement +## # could interfere with other good alignments. +## #-------------------------------------------------------- +## if ( $alignment_type eq '=~' ) { +## my $terminal_type = $types_to_go[$i_terminal]; +## if ( $count > 0 || $max_line > 0 || $terminal_type ne ';' ) +## { +## $alignment_type = ""; +## } +## } #-------------------------------------------------------- # then store the value -- 2.39.5