X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FApp%2FFatPacker.pm;h=ea9f2b95ea1f70940d3025a2a433b9ec74a86a45;hb=dolmen%2Fskip-pod-files;hp=c127ca7047aa69e7053ad96dd26a343f0c25daf9;hpb=f67555409566fd2f9b83ccdbaccce8444477c3be;p=p5sagit%2FApp-FatPacker.git

diff --git a/lib/App/FatPacker.pm b/lib/App/FatPacker.pm
index c127ca7..ea9f2b9 100644
--- a/lib/App/FatPacker.pm
+++ b/lib/App/FatPacker.pm
@@ -240,6 +240,7 @@ sub collect_files {
   my ($self, $dir, $files) = @_;
   find(sub {
     return unless -f $_;
+    return if /\.pod$/;
     !/\.pm$/ and warn "File ${File::Find::name} isn't a .pm file - can't pack this -- if you hoped we were going to, things may not be what you expected later\n" and return;
     $files->{File::Spec::Unix->abs2rel($File::Find::name,$dir)} =
       $self->load_file($File::Find::name);