]> git.donarmstrong.com Git - perltidy.git/blobdiff - t/snippets3.t
New upstream version 20200110
[perltidy.git] / t / snippets3.t
index aa37aef90991a12ec374f68fbbd6f3bf42169ee0..9d8bf290a1ef98e54bfd08807c3d46d42c451bed 100644 (file)
@@ -794,10 +794,10 @@ $_, $val
         given ( [ 9, "a", 11 ] ) {
             when (qr/\d/) {
                 given ($count) {
-                    when (1) { ok( $count == 1 ) }
-                    else     { ok( $count != 1 ) }
+                    when (1)          { ok( $count == 1 ) }
+                    else              { ok( $count != 1 ) }
                     when ( [ 5, 6 ] ) { ok(0) }
-                    else { ok(1) }
+                    else              { ok(1) }
                 }
             }
             ok(1) when 11;