From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Sat, 13 Aug 2022 18:04:19 +0000 (-0700)
Subject: do not pad C-style 'for' terms
X-Git-Tag: 20220613.04~1
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=c449a8204b38f501bbf7a46aa6506f6d398db789;p=perltidy.git

do not pad C-style 'for' terms
---

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index faa0b9af..f09171f6 100644
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -23990,6 +23990,9 @@ sub get_seqno {
                         $ok_comma = $tok_next_next eq $tok_next;
                     }
 
+                    # no padding of C-style 'for' terms ('f' is ';' c154)
+                    next if ( $types_to_go[$iendm] eq 'f' );
+
                     next
                       unless (
                            $is_assignment{ $types_to_go[$iendm] }