From 7a5ea4aefccf60321be2e6e59cb045bf5951d8e6 Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Sat, 25 Oct 2008 15:23:48 +0000 Subject: [PATCH 1/1] Upgrade to ExtUtils::Manifest 1.55. p4raw-id: //depot/perl@34591 --- lib/ExtUtils/Manifest.pm | 2 +- lib/ExtUtils/t/Manifest.t | 3 ++- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/lib/ExtUtils/Manifest.pm b/lib/ExtUtils/Manifest.pm index bcc476d..c7eb39a 100644 --- a/lib/ExtUtils/Manifest.pm +++ b/lib/ExtUtils/Manifest.pm @@ -13,7 +13,7 @@ use vars qw($VERSION @ISA @EXPORT_OK $Is_MacOS $Is_VMS $Debug $Verbose $Quiet $MANIFEST $DEFAULT_MSKIP); -$VERSION = '1.54'; +$VERSION = '1.55'; @ISA=('Exporter'); @EXPORT_OK = qw(mkmanifest manicheck filecheck fullcheck skipcheck diff --git a/lib/ExtUtils/t/Manifest.t b/lib/ExtUtils/t/Manifest.t index 6139202..a3754b4 100644 --- a/lib/ExtUtils/t/Manifest.t +++ b/lib/ExtUtils/t/Manifest.t @@ -35,8 +35,9 @@ sub add_file { 1 while unlink $file; # or else we'll get multiple versions on VMS open( T, '> '.$file) or return; print T $data; - ++$Files{$file}; close T; + return 0 unless -e $file; # exists under the name we gave it ? + ++$Files{$file}; } sub read_manifest { -- 1.8.3.1