diff options
author | Craig A. Berry <craigberry@mac.com> | 2001-10-03 12:45:25 -0500 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-04 03:02:19 +0000 |
commit | 1b907316ce9a27a760590c1349443905f1afc6f2 (patch) | |
tree | f97aaea3bc57d461f352e2323a9aacf8e25e8c51 /lib | |
parent | d78106c0605755e51c4b67241a697a8bcbc5a54d (diff) | |
download | perl-1b907316ce9a27a760590c1349443905f1afc6f2.tar.gz |
2 more VMS test tweaks
Message-Id: <5.1.0.14.0.20011003154131.01bc8528@exchi01>
(the lib/Term/Complete.t patched differently by #12332)
p4raw-id: //depot/perl@12333
Diffstat (limited to 'lib')
-rw-r--r-- | lib/ExtUtils/Command.t | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/ExtUtils/Command.t b/lib/ExtUtils/Command.t index 4c1ee08090..3a25bffe4b 100644 --- a/lib/ExtUtils/Command.t +++ b/lib/ExtUtils/Command.t @@ -31,6 +31,7 @@ BEGIN { local *DIR; opendir(DIR, File::Spec->curdir()); while ($file = readdir(DIR)) { + $file =~ s/\.\z// if $^O eq 'VMS'; last if $file =~ /^\w/; } } |