ext/XS-APItest/t/handy.t: White-space only

Indent 2 newly formed blocks properly

diff --git a/ext/XS-APItest/t/handy.t b/ext/XS-APItest/t/handy.t
index 19f78c9..ffa2f17 100644 (file)
--- a/ext/XS-APItest/t/handy.t
+++ b/ext/XS-APItest/t/handy.t
@@ -133,16 +133,16 @@ foreach my $name (sort keys %properties) {
             }
 
             if (defined $locale) {
-            use locale;
+                use locale;
 
-            $ret = truth eval "test_is${function}_LC($i)";
-            if ($@) {
-                fail($@);
-            }
-            else {
-                my $truth = truth($matches && $i < 128);
-                is ($ret, $truth, "is${function}_LC( $display_name ) == $truth");
-            }
+                $ret = truth eval "test_is${function}_LC($i)";
+                if ($@) {
+                    fail($@);
+                }
+                else {
+                    my $truth = truth($matches && $i < 128);
+                    is ($ret, $truth, "is${function}_LC( $display_name ) == $truth");
+                }
             }
         }
 
@@ -179,16 +179,16 @@ foreach my $name (sort keys %properties) {
         }
 
         if ($name ne 'vertws' && defined $locale) {
-        use locale;
+            use locale;
 
-        $ret = truth eval "test_is${function}_LC_utf8('$char')";
-        if ($@) {
-            fail($@);
-        }
-        else {
-            my $truth = truth($matches && ($i < 128 || $i > 255));
-            is ($ret, $truth, "is${function}_LC_utf8( $display_name ) == $truth");
-        }
+            $ret = truth eval "test_is${function}_LC_utf8('$char')";
+            if ($@) {
+                fail($@);
+            }
+            else {
+                my $truth = truth($matches && ($i < 128 || $i > 255));
+                is ($ret, $truth, "is${function}_LC_utf8( $display_name ) == $truth");
+            }
         }
     }
 }