From: Tatsuhiko Miyagawa <miyagawa@bulknews.net>
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?p=p5sagit%2FApp-FatPacker.git;a=commitdiff_plain;h=0c46b17a79bfafc4008744e9c0918e14fb8d7966

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 {