>>>>> On Wed, 17 Apr 2002 13:01:04 -0400 (EDT), Andy Dougherty
><[EMAIL PROTECTED]> said:
> I may have time much later today to look into this further, but I'd be
> happy for someone to beat me to it.
culpa 15599.
This patch seems to fix it, needs confirmation by Schwern.
--- /usr/sources/perl/repoperls/perl-5.7.3@15975/lib/ExtUtils/Manifest.pm Wed
Apr 17 17:48:25 2002
+++ /usr/local/perl-5.7.3@15975/lib/5.7.3/ExtUtils/Manifest.pm Wed Apr 17 21:07:20
+2002
@@ -206,10 +206,10 @@
# returns an anonymous sub that decides if an argument matches
sub _maniskip {
- my (%args) = @_;
+ my($mfile, %args) = @_;
my @skip ;
- my $mfile ||= "$MANIFEST.SKIP";
+ $mfile ||= "$MANIFEST.SKIP";
local *M;
open M, $mfile or open M, $DEFAULT_MSKIP or return sub {0};
while (<M>){
--
andreas
