From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Tue, 13 Nov 2018 01:54:03 +0000 (-0800)
Subject: Added alignment of !~
X-Git-Tag: 20181117~16
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=da3ad2a9f0c0ed3dcb8edf1742e0602306a38479;p=perltidy.git

Added alignment of !~
---

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index fec69f32..8630170c 100644
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -9419,6 +9419,9 @@ sub send_lines_to_vertical_aligner {
 
                 my $tok = my $raw_tok = $matching_token_to_go[$i];
 
+		# map similar items
+		if ($tok eq '!~') {$tok = '=~'}
+
                 # make separators in different nesting depths unique
                 # by appending the nesting depth digit.
                 if ( $raw_tok ne '#' ) {
@@ -10614,7 +10617,7 @@ sub get_seqno {
         # Replaced =~ and // in the list.  // had been removed in RT 119588
         @q = qw#
           = **= += *= &= <<= &&= -= /= |= >>= ||= //= .= %= ^= x=
-          { ? : => && || ~~ !~~ =~ //
+          { ? : => && || ~~ !~~ =~ !~ //
           #;
         @is_vertical_alignment_type{@q} = (1) x scalar(@q);