[Module-build-checkins] Module-Build/lib/Module/Build Base.pm,1.504,1.505

[Randy W. S. <si...@us...>]

Update of /cvsroot/module-build/Module-Build/lib/Module/Build
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21762/lib/Module/Build

Modified Files:
	Base.pm 
Log Message:
Actions html & manpages were quiting too early if no pod was found for "bin" files, without checking for "lib" files.

Index: Base.pm
===================================================================
RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Base.pm,v
retrieving revision 1.504
retrieving revision 1.505
diff -u -d -r1.504 -r1.505
--- Base.pm	23 Oct 2005 03:06:01 -0000	1.504
+++ Base.pm	23 Oct 2005 03:37:38 -0000	1.505
@@ -2087,8 +2087,7 @@
     foreach my $type ( qw(bin lib) ) {
       my $files = $self->_find_pods( $self->{properties}{"${type}doc_dirs"},
                                      exclude => [ qr/\.bat$/ ] );
-      return if !%$files ||
-	        (%$files && !$self->install_destination("${type}doc"));
+      return if %$files && !$self->install_destination("${type}doc");
 
     }
   }
@@ -2177,8 +2176,7 @@
     foreach my $type ( qw(bin lib) ) {
       my $files = $self->_find_pods( $self->{properties}{"${type}doc_dirs"},
 				      exclude => [ qr/\.(?:bat|com|html)$/ ] );
-      return if !%$files ||
-	        (%$files && !$self->install_destination("${type}html"));
+      return if %$files && !$self->install_destination("${type}html");
     }
   }