--indent-columns=1
--square-bracket-vertical-tightness-closing=1
+==> b1332.in <==
+# S1
+ $b->configure (
+ -text => $dayArray[$col], # disable the button
+ -state => 'disabled' );
+
+# S2
+ $b->configure ( -text => $dayArray[$col], # disable the button
+ -state => 'disabled' );
+
+==> b1332.par <==
+--extended-line-up-parentheses
+--indent-columns=2
+--maximum-line-length=68
+--paren-vertical-tightness=2
+--space-function-paren
+
==> b1333.in <==
# S1
$_[
&& $rLL->[$K_terminal]->[_TYPE_] eq ',' )
{
my $Kend = $K_terminal;
- if ( $Kend < $K_last
- && !$rOpts_ignore_side_comment_lengths )
- {
- $Kend = $K_last;
- }
+
+ # fix for b1332: side comments handled at end of loop
+ ##if ( $Kend < $K_last
+ ## && !$rOpts_ignore_side_comment_lengths )
+ ##{
+ ## $Kend = $K_last;
+ ##}
# Measure from the next blank if any (fixes b1301)
my $Kbeg = $KK;