t/00-perl-c.t
changeset 150 3db363880766
parent 103 0c9f37c94f0c
--- a/t/00-perl-c.t	Thu Jun 30 15:19:33 2011 +0200
+++ b/t/00-perl-c.t	Thu Jun 30 16:24:32 2011 +0200
@@ -6,10 +6,13 @@
 use File::Find;
 
 plan skip_all => "no blib directories in \@INC"
-    if not /blib/ ~~ @INC;
+  if not /blib/ ~~ @INC;
 
-find(sub{
-    -f -x or return;
-    system("perl -Mblib -c $_ &>/dev/null");
-    is($? => 0, "syntax $File::Find::name");
-}, "blib/");
+find(
+    sub {
+        -f -x or return;
+        system("perl -Mblib -c $_ &>/dev/null");
+        is( $? => 0, "syntax $File::Find::name" );
+    },
+    "blib/"
+);