From: Tatsuhiko Miyagawa Date: Wed, 3 Apr 2013 21:14:48 +0000 (-0700) Subject: Skip lib if it doesn't exist X-Git-Tag: v0.009014~4 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0c46b17a79bfafc4008744e9c0918e14fb8d7966;p=p5sagit%2FApp-FatPacker.git Skip lib if it doesn't exist --- diff --git a/lib/App/FatPacker.pm b/lib/App/FatPacker.pm index 75ba087..b968332 100644 --- a/lib/App/FatPacker.pm +++ b/lib/App/FatPacker.pm @@ -187,7 +187,7 @@ sub script_command_file { my ($self, $args) = @_; my $file = shift @$args; my $cwd = cwd; - my @dirs = map rel2abs($_, $cwd), ('lib','fatlib'); + my @dirs = grep -d, map rel2abs($_, $cwd), ('lib','fatlib'); my %files; foreach my $dir (@dirs) { find(sub {