From 7b5ffd683412b85d9b4195fc24b5966d41b591ae Mon Sep 17 00:00:00 2001 From: Richard Levitte Date: Mon, 29 Oct 2001 13:05:28 +0000 Subject: Addapt VMS scripts to the newer disk layout system ODS-5, which allows more than one period and mixed size characters in file names --- test/maketests.com | 1 + 1 file changed, 1 insertion(+) (limited to 'test') diff --git a/test/maketests.com b/test/maketests.com index 3ef3ba8fa5..e0be3dd43b 100644 --- a/test/maketests.com +++ b/test/maketests.com @@ -1031,6 +1031,7 @@ $! $! Save directory information $! $ __HERE = F$PARSE(F$PARSE("A.;",F$ENVIRONMENT("PROCEDURE"))-"A.;","[]A.;") - "A.;" +$ __HERE = F$EDIT(__HERE,"UPCASE") $ __TOP = __HERE - "TEST]" $ __INCLUDE = __TOP + "INCLUDE.OPENSSL]" $! -- cgit v1.2.3