This is so people won't need to practice clairvoyancy to foresee new
MANIFEST.SKIP entries like "^blibdirs$" -- otherwise, Module::Signature
is rendered broken.
Thanks,
/Autrijus/
--- Manifest.pm.orig Fri Dec 12 08:48:05 2003
+++ Manifest.pm Fri Dec 12 08:52:41 2003
@@ -348,14 +348,18 @@
my @skip ;
my $mfile = "$MANIFEST.SKIP";
local(*M,$_);
- open M, $mfile or open M, $DEFAULT_MSKIP or return sub {0};
- while (<M>){
- chomp;
- next if /^#/;
- next if /^\s*$/;
- push @skip, _macify($_);
+ foreach my $M ($mfile, $DEFAULT_MSKIP) {
+ open M, $M or next;
+ while (<M>){
+ chomp;
+ next if /^#/;
+ next if /^\s*$/;
+ push @skip, _macify($_);
+ }
+ close M;
}
- close M;
+ return sub {0} unless @skip;
+
my $opts = $Is_VMS ? '(?i)' : '';
# Make sure each entry is isolated in its own parentheses, in case