]> git.donarmstrong.com Git - perltidy.git/blobdiff - t/testsa.t
Imported Upstream version 20130922
[perltidy.git] / t / testsa.t
index 6c78756883eb207f94b8a1fe3d9b3db42999a678..d360dda536abe2f947e6b7b6e90519ba801035d7 100644 (file)
@@ -17,8 +17,8 @@ if ($seqno) {
   }
 }
 elsif (tok =~/[\)\]\}]/) {
-  $min_indentation = $indentation{$seqno}
-  delete $indentation{$seqno}
+  $min_indentation = $indentation{$seqno};
+  delete $indentation{$seqno};
   if ($indentation < $min_indentation) {$indentation = $min_indentation}
 }
 EOM
@@ -61,10 +61,9 @@ if ($seqno) {
         $indentation{$seqno} = indentation;
     }
 } elsif ( tok =~ /[\)\]\}]/ ) {
-    $min_indentation =
-      $indentation{$seqno} delete $indentation{$seqno}
-      if ( $indentation < $min_indentation )
-    {
+    $min_indentation = $indentation{$seqno};
+    delete $indentation{$seqno};
+    if ( $indentation < $min_indentation ) {
         $indentation = $min_indentation;
     }
 }