From 8713643e844ed8f4c79356f71e306822511dbfeb Mon Sep 17 00:00:00 2001
From: Charles Bailey <bailey@newman.upenn.edu>
Date: Wed, 24 May 2000 02:19:55 +0000
Subject: [PATCH] Check for existence of file before trying to delete

p4raw-id: //depot/vmsperl@6112
---
 vms/test.com | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/vms/test.com b/vms/test.com
index 5bb999d..1039525 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
-- 
2.7.4