Skip lib if it doesn't exist
Tatsuhiko Miyagawa [Wed, 3 Apr 2013 21:14:48 +0000 (14:14 -0700)]
lib/App/FatPacker.pm

index 75ba087..b968332 100644 (file)
@@ -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 {