diff options
author | Richard Levitte <levitte@openssl.org> | 2006-03-25 10:24:22 +0000 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2006-03-25 10:24:22 +0000 |
commit | a61114c38b5dd8bd207235ce94ec495f18c7d6a3 (patch) | |
tree | 6efb69da9e5981f1085577c66946ab21770c807a | |
parent | db98bbc1144cb7ac412562a54aaba0e4d2cde080 (diff) |
Only try to remove the tsa.dir subdirectory if it actually exists.
-rw-r--r-- | test/testtsa.com | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/test/testtsa.com b/test/testtsa.com index 846e8c162d..b6bd8c67b0 100644 --- a/test/testtsa.com +++ b/test/testtsa.com @@ -18,9 +18,12 @@ $ $ setup_dir: $ subroutine $ -$ @[-.util]deltree [.tsa]*.* -$ set file/prot=(S:RWED,O:RWED,G:RWED,W:RWED) tsa.dir;* -$ delete tsa.dir;* +$ if f$search("tsa.dir") .nes "" +$ then +$ @[-.util]deltree [.tsa]*.* +$ set file/prot=(S:RWED,O:RWED,G:RWED,W:RWED) tsa.dir;* +$ delete tsa.dir;* +$ endif $ $ create/dir [.tsa] $ set default [.tsa] |