fix b1467

diff --git a/dev-bin/run_convergence_tests.pl.data b/dev-bin/run_convergence_tests.pl.data
index ea6d005511a923250de8d0eb665796b1ef32f51a..3e9556ead8fb2e349a377ec88221ddfdc30d9825 100644 (file)
--- a/dev-bin/run_convergence_tests.pl.data
+++ b/dev-bin/run_convergence_tests.pl.data
@@ -12025,6 +12025,25 @@ sub new{
 --extended-continuation-indentation
 --extended-line-up-parentheses
 
+==> b1467.in <==
+      my $self = [
+            {     receive  => 1,
+                  transmit => 2,
+            }] ;
+
+      my $self
+        = [
+            { receive => 1, transmit => 2, }
+        ] ;
+
+==> b1467.par <==
+--maximum-line-length=44
+--indent-columns=6
+--want-break-before='='
+--square-bracket-vertical-tightness-closing=1
+--square-bracket-tightness=2
+--brace-vertical-tightness=1
+
 ==> b148.in <==
 # state 1
 @yydgoto=(

diff --git a/dev-bin/run_convergence_tests.pl.expect b/dev-bin/run_convergence_tests.pl.expect
index 9d8b807d5f0eb0e05b282c7d1938978064b89917..a8f7f127f574eaa6b25dc8e8aa1eb82ee4f485d1 100644 (file)
--- a/dev-bin/run_convergence_tests.pl.expect
+++ b/dev-bin/run_convergence_tests.pl.expect
@@ -8158,6 +8158,17 @@ sub new{
 
 }
 
+==> b1467 <==
+      my $self = [
+            {     receive  => 1,
+                  transmit => 2,
+            }];
+
+      my $self = [
+            {     receive  => 1,
+                  transmit => 2,
+            }];
+
 ==> b148 <==
 # state 1
 @yydgoto=(

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index 1d4a9d3d598d5778ee5fd66357d34a443ea705ff..e210dccbca0f0ec717706621eaf3680e532e4805 100644 (file)
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -27479,6 +27479,14 @@ sub find_token_starting_list {
         }
         if ( $types_to_go[$i_opening_minus] eq 'b' ) { $i_opening_minus++ }
     }
+
+    # fix for b1467
+    elsif ( $type_prev_nb eq '=' ) {
+        if ( $want_break_before{$type_prev_nb} ) {
+            $i_opening_minus = $iprev_nb;
+        }
+    }
+
     else {
         ## previous token not special
     }