It seems like sslroot: needs to be defined for some tests to work.

Submitted by Steven M. Schweda <sms@antinode.info>
This commit is contained in:
Richard Levitte 2010-01-25 00:20:32 +00:00
parent c8ca769d3b
commit 74397d45b2

View File

@ -12,6 +12,9 @@ $ if __arch .eqs. "" then __arch := UNK
$ texe_dir := sys$disk:[-.'__arch'.exe.test] $ texe_dir := sys$disk:[-.'__arch'.exe.test]
$ exe_dir := sys$disk:[-.'__arch'.exe.apps] $ exe_dir := sys$disk:[-.'__arch'.exe.apps]
$ $
$ sslroot = f$parse("sys$disk:[-.apps];",,,,"syntax_only") - "].;"+ ".]"
$ define /translation_attributes = concealed sslroot 'sslroot'
$
$ set default '__here' $ set default '__here'
$ $
$ on control_y then goto exit $ on control_y then goto exit
@ -292,4 +295,5 @@ $
$ $
$ exit: $ exit:
$ set default '__save_default' $ set default '__save_default'
$ deassign sslroot
$ exit $ exit