diff options
| author | Charles Bailey <bailey@newman.upenn.edu> | 2000-05-24 02:19:55 +0000 |
|---|---|---|
| committer | bailey <bailey@newman.upenn.edu> | 2000-05-24 02:19:55 +0000 |
| commit | 8713643e844ed8f4c79356f71e306822511dbfeb (patch) | |
| tree | 00009bbd4a4af510af4c19b66e814638597cdd00 /vms | |
| parent | ee8c7f5465f003860e2347a2946abacac39bd9b9 (diff) | |
| download | perl-8713643e844ed8f4c79356f71e306822511dbfeb.tar.gz | |
Check for existence of file before trying to delete
p4raw-id: //depot/vmsperl@6112
Diffstat (limited to 'vms')
| -rw-r--r-- | vms/test.com | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/vms/test.com b/vms/test.com index 5bb999d5a4..1039525e9e 100644 --- a/vms/test.com +++ b/vms/test.com @@ -41,7 +41,7 @@ $ if p2.nes."" then dbg = "dbg" $ if p2.nes."" then ndbg = "ndbg" $! $! Pick up a copy of perl to use for the tests -$ Delete/Log/NoConfirm Perl.;* +$ If F$Search("Perl.").nes."" Then Delete/Log/NoConfirm Perl.;* $ Copy/Log/NoConfirm [-]'ndbg'Perl'exe' []Perl. $ $! Make the environment look a little friendlier to tests which assume Unix |