diff options
| author | Craig A. Berry <craigberry@mac.com> | 2003-08-17 18:28:21 -0500 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-18 04:53:22 +0000 |
| commit | 383e43c729f9f94a92e4c0cd777de8d2608751de (patch) | |
| tree | cea61d61001cb1f465eec5aa382b6a5e0a15caad /lib/Pod/t | |
| parent | 39741d738e6fb2ee9de47dcf0299296483fa68f1 (diff) | |
| download | perl-383e43c729f9f94a92e4c0cd777de8d2608751de.tar.gz | |
Pod::Html test clean-up (was Re: maint @ 20617 (on VMS))
From: "Craig A. Berry" <craigberry@mac.com>
Message-ID: <3F4055E5.2070407@mac.com>
p4raw-id: //depot/perl@20750
Diffstat (limited to 'lib/Pod/t')
| -rw-r--r-- | lib/Pod/t/pod2html-lib.pl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/Pod/t/pod2html-lib.pl b/lib/Pod/t/pod2html-lib.pl index f61392b0db..0361a0a7ee 100644 --- a/lib/Pod/t/pod2html-lib.pl +++ b/lib/Pod/t/pod2html-lib.pl @@ -55,8 +55,9 @@ sub convert_n_test { # pod2html creates these 1 while unlink $outfile; - 1 while unlink "pod2htmd.x~~"; - 1 while unlink "pod2htmi.x~~"; + my $cache_ext = $^O eq 'VMS' ? ".tmp" : ".x~~"; + 1 while unlink "pod2htmd$cache_ext"; + 1 while unlink "pod2htmi$cache_ext"; } 1; |