From: Peter Prymmer <PPrymmer@factset.com>
Date: Tue, 19 Aug 2003 10:29:44 +0000 (-0400)
Subject: Replace #20772 with
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d89514c25b731ec9e14e39a4e64f5a8251603f17;p=p5sagit%2Fp5-mst-13.2.git

Replace #20772 with

Subject: Re: [PATCH: perl@20760] VMS specific fix for lib/ExtUtils/t/Manifest.t
Message-ID: <OFE22C35CE.D5CB1A7F-ON85256D87.004E3BCA-85256D87.004F9EF2@factset.com>
Date: Tue, 19 Aug 2003 10:29:44 -0400

p4raw-id: //depot/perl@20776
---

diff --git a/lib/ExtUtils/t/Manifest.t b/lib/ExtUtils/t/Manifest.t
index 24c849b..8f069ac 100644
--- a/lib/ExtUtils/t/Manifest.t
+++ b/lib/ExtUtils/t/Manifest.t
@@ -189,20 +189,16 @@ $files = maniread;
 is( $files->{wibble}, '',    'maniadd() with undef comment' );
 is( $files->{yarrow}, 'hock','          with comment' );
 is( $files->{foobar}, '',    '          preserved old entries' );
-
+maniadd({ foo  => 'bar' });
 add_file('MANIFEST'   => 'Makefile.PL');
-maniadd({ 'META.yml'  => 'Module meta-data (added by MakeMaker)' });
+
 $files = maniread;
 # VMS downcases the MANIFEST.  We normalize it here to match.
 %$files = map { (lc $_ => $files->{$_}) } keys %$files;
 my %expect = ( 'makefile.pl' => '',
-               'meta.yml'    => 'Module meta-data (added by MakeMaker)' 
-             );
+               'foo'         => 'bar' );
 is_deeply( $files, \%expect, 'maniadd() vs MANIFEST without trailing newline');
 
-add_file('MANIFEST'   => 'Makefile.PL');
-maniadd({ foo => 'bar' });
-
 SKIP: {
     chmod( 0400, 'MANIFEST' );
     skip "Can't make MANIFEST read-only", 2 if -w 'MANIFEST';