diff -r 44183c6b78b6 -r 1ed33114d87f t/00-perl-c.t --- 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/" +);