--- 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/"
+);