diff options
| author | Peter Prymmer <PPrymmer@factset.com> | 2003-08-18 11:57:12 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-18 19:01:33 +0000 |
| commit | 880a76e2f35aeaa0d2eac1e5117d0f24c7256baa (patch) | |
| tree | 172ee393b3e5314d4d14dc66053e1c9037802a9f | |
| parent | 1b2d76876dbac296f91bb477714fdc99f8d3f512 (diff) | |
| download | perl-880a76e2f35aeaa0d2eac1e5117d0f24c7256baa.tar.gz | |
VMS specific fix for lib/ExtUtils/t/Manifest.t
Message-ID: <OF314202D4.49371ADF-ON85256D86.006CEBE2-85256D86.006D9AA7@factset.com>
p4raw-id: //depot/perl@20763
| -rw-r--r-- | lib/ExtUtils/t/Manifest.t | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/lib/ExtUtils/t/Manifest.t b/lib/ExtUtils/t/Manifest.t index 50cf8697c7..253abf63cb 100644 --- a/lib/ExtUtils/t/Manifest.t +++ b/lib/ExtUtils/t/Manifest.t @@ -204,9 +204,16 @@ SKIP: { chmod( 0400, 'MANIFEST' ); skip "Can't make MANIFEST read-only", 2 if -w 'MANIFEST'; - eval { - maniadd({ 'META.yml' => 'hock' }); - }; + if ( $^O eq 'VMS' ) { + eval { + maniadd({ 'meta.yml' => 'hock' }); + }; + } + else { + eval { + maniadd({ 'META.yml' => 'hock' }); + }; + } is( $@, '', "maniadd() won't open MANIFEST if it doesn't need to" ); eval { |