--- a/t/00-perl-c.t Thu Jun 30 16:15:59 2011 +0200
+++ b/t/00-perl-c.t Thu Jun 30 16:34:57 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/"
+);