Addapt VMS scripts to the newer disk layout system ODS-5, which allows more than one period and mixed size characters in file names
diff --git a/apps/makeapps.com b/apps/makeapps.com
index d665143..219f571 100644
--- a/apps/makeapps.com
+++ b/apps/makeapps.com
@@ -1113,6 +1113,7 @@
$! Save directory information
$!
$ __HERE = F$PARSE(F$PARSE("A.;",F$ENVIRONMENT("PROCEDURE"))-"A.;","[]A.;") - "A.;"
+$ __HERE = F$EDIT(__HERE,"UPCASE")
$ __TOP = __HERE - "APPS]"
$ __INCLUDE = __TOP + "INCLUDE.OPENSSL]"
$!
diff --git a/crypto/crypto-lib.com b/crypto/crypto-lib.com
index b4d80f7..2fdf623 100644
--- a/crypto/crypto-lib.com
+++ b/crypto/crypto-lib.com
@@ -1453,6 +1453,7 @@
$! Save directory information
$!
$ __HERE = F$PARSE(F$PARSE("A.;",F$ENVIRONMENT("PROCEDURE"))-"A.;","[]A.;") - "A.;"
+$ __HERE = F$EDIT(__HERE,"UPCASE")
$ __TOP = __HERE - "CRYPTO]"
$ __INCLUDE = __TOP + "INCLUDE.OPENSSL]"
$!
diff --git a/makevms.com b/makevms.com
index 638d61b..49b98b5 100755
--- a/makevms.com
+++ b/makevms.com
@@ -249,8 +249,14 @@
$ THEN
$ TYPE [.CRYPTO]OPENSSLCONF_H.IN /OUTPUT=H_FILE:
$ ELSE
-$ WRITE SYS$ERROR "Couldn't find a [.CRYPTO]OPENSSLCONF.H_IN. Exiting!"
-$ EXIT 0
+$ ! For ODS-5
+$ IF F$SEARCH("[.CRYPTO]OPENSSLCONF.H.IN") .NES. ""
+$ THEN
+$ TYPE [.CRYPTO]OPENSSLCONF.H.IN /OUTPUT=H_FILE:
+$ ELSE
+$ WRITE SYS$ERROR "Couldn't find a [.CRYPTO]OPENSSLCONF.H_IN. Exiting!"
+$ EXIT 0
+$ ENDIF
$ ENDIF
$ ENDIF
$ IF ARCH .EQS. "AXP"
diff --git a/ssl/ssl-lib.com b/ssl/ssl-lib.com
index cc64544..313ff25 100644
--- a/ssl/ssl-lib.com
+++ b/ssl/ssl-lib.com
@@ -1174,6 +1174,7 @@
$! Save directory information
$!
$ __HERE = F$PARSE(F$PARSE("A.;",F$ENVIRONMENT("PROCEDURE"))-"A.;","[]A.;") - "A.;"
+$ __HERE = F$EDIT(__HERE,"UPCASE")
$ __TOP = __HERE - "SSL]"
$ __INCLUDE = __TOP + "INCLUDE.OPENSSL]"
$!
diff --git a/test/maketests.com b/test/maketests.com
index 3ef3ba8..e0be3dd 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]"
$!
