Typo...
This commit is contained in:
parent
c58d983e3b
commit
95e362c6da
@ -11,7 +11,7 @@ $
|
|||||||
$ set noon
|
$ set noon
|
||||||
$ if f$search("demoCA.dir") .nes. ""
|
$ if f$search("demoCA.dir") .nes. ""
|
||||||
$ then
|
$ then
|
||||||
$ @[-.utils]deltree [.demoCA]*.*
|
$ @[-.util]deltree [.demoCA]*.*
|
||||||
$ set file/prot=(S:RWED,O:RWED,G:RWED,W:RWED) demoCA.dir;*
|
$ set file/prot=(S:RWED,O:RWED,G:RWED,W:RWED) demoCA.dir;*
|
||||||
$ delete demoCA.dir;*
|
$ delete demoCA.dir;*
|
||||||
$ endif
|
$ endif
|
||||||
@ -38,7 +38,7 @@ $ @[-.apps]CA.com -verify newcert.pem
|
|||||||
$ if $severity .ne. 1 then exit 3
|
$ if $severity .ne. 1 then exit 3
|
||||||
$
|
$
|
||||||
$ set noon
|
$ set noon
|
||||||
$ @[-.utils]deltree [.demoCA]*.*
|
$ @[-.util]deltree [.demoCA]*.*
|
||||||
$ set file/prot=(S:RWED,O:RWED,G:RWED,W:RWED) demoCA.dir;*
|
$ set file/prot=(S:RWED,O:RWED,G:RWED,W:RWED) demoCA.dir;*
|
||||||
$ delete demoCA.dir;*
|
$ delete demoCA.dir;*
|
||||||
$ if f$search("newcert.pem") .nes. "" then delete newcert.pem;*
|
$ if f$search("newcert.pem") .nes. "" then delete newcert.pem;*
|
||||||
|
@ -18,7 +18,7 @@ $
|
|||||||
$ setup_dir:
|
$ setup_dir:
|
||||||
$ subroutine
|
$ subroutine
|
||||||
$
|
$
|
||||||
$ @[-.utils]deltree [.tsa]*.*
|
$ @[-.util]deltree [.tsa]*.*
|
||||||
$ set file/prot=(S:RWED,O:RWED,G:RWED,W:RWED) tsa.dir;*
|
$ set file/prot=(S:RWED,O:RWED,G:RWED,W:RWED) tsa.dir;*
|
||||||
$ delete tsa.dir;*
|
$ delete tsa.dir;*
|
||||||
$
|
$
|
||||||
@ -30,7 +30,7 @@ $ clean_up_dir:
|
|||||||
$ subroutine
|
$ subroutine
|
||||||
$
|
$
|
||||||
$ set default [-]
|
$ set default [-]
|
||||||
$ @[-.utils]deltree [.tsa]*.*
|
$ @[-.util]deltree [.tsa]*.*
|
||||||
$ set file/prot=(S:RWED,O:RWED,G:RWED,W:RWED) tsa.dir;*
|
$ set file/prot=(S:RWED,O:RWED,G:RWED,W:RWED) tsa.dir;*
|
||||||
$ delete tsa.dir;*
|
$ delete tsa.dir;*
|
||||||
$ endsubroutine
|
$ endsubroutine
|
||||||
@ -39,7 +39,7 @@ $ create_ca:
|
|||||||
$ subroutine
|
$ subroutine
|
||||||
$
|
$
|
||||||
$ write sys$output "Creating a new CA for the TSA tests..."
|
$ write sys$output "Creating a new CA for the TSA tests..."
|
||||||
$ @[--.utils]deltree [.demoCA]*.*
|
$ @[--.util]deltree [.demoCA]*.*
|
||||||
$
|
$
|
||||||
$ open/write file VMStsa-response.create_ca
|
$ open/write file VMStsa-response.create_ca
|
||||||
$ write file ""
|
$ write file ""
|
||||||
|
Loading…
x
Reference in New Issue
Block a user