From 74397d45b26e0d36b0b550d863d837767935966d Mon Sep 17 00:00:00 2001 From: Richard Levitte Date: Mon, 25 Jan 2010 00:20:32 +0000 Subject: [PATCH] It seems like sslroot: needs to be defined for some tests to work. Submitted by Steven M. Schweda --- test/tests.com | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/test/tests.com b/test/tests.com index 6bd60ca39..d151cd395 100644 --- a/test/tests.com +++ b/test/tests.com @@ -12,6 +12,9 @@ $ if __arch .eqs. "" then __arch := UNK $ texe_dir := sys$disk:[-.'__arch'.exe.test] $ exe_dir := sys$disk:[-.'__arch'.exe.apps] $ +$ sslroot = f$parse("sys$disk:[-.apps];",,,,"syntax_only") - "].;"+ ".]" +$ define /translation_attributes = concealed sslroot 'sslroot' +$ $ set default '__here' $ $ on control_y then goto exit @@ -292,4 +295,5 @@ $ $ $ exit: $ set default '__save_default' +$ deassign sslroot $ exit