X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FPAR.pm;h=dcbe9a39678807e922e602297bd8d489ddc70958;hb=255b19ac18c639bc8e5b79d711f6e68c4f77b116;hp=3a719c2e41c0bf9e87148fa2d8cfd3d51823e0bf;hpb=b51339a0540f07e3df8e6b4255afa6d9953d9165;p=catagits%2FCatalyst-Runtime.git

diff --git a/lib/Catalyst/PAR.pm b/lib/Catalyst/PAR.pm
index 3a719c2..dcbe9a3 100644
--- a/lib/Catalyst/PAR.pm
+++ b/lib/Catalyst/PAR.pm
@@ -52,6 +52,8 @@ sub package {
         sub {
             my $name = $File::Find::name;
             return if $name =~ /^\W*lib/;
+            return if $name =~ /^\W*blib/;
+            return if $name =~ /^\W*_build/;
             return if $name =~ /\.par$/;
             return if $name !~ /\w+/;
             push @files, $name;
@@ -78,7 +80,7 @@ EOF
     local $SIG{__WARN__} = sub { };
     open my $olderr, '>&STDERR';
     open STDERR, '>', File::Spec->devnull;
-    my %opt = ( 'x' => 1, 'n' => 0, 'o' => $par, 'a' => [@files], 'B' => 1 );
+    my %opt = ( 'x' => 1, 'n' => 0, 'o' => $par, 'a' => [@files], 'p' => 1 );
     App::Packer::PAR->new(
         frontend  => 'Module::ScanDeps',
         backend   => 'PAR::Packer',