diff options
| author | Richard Levitte <levitte@openssl.org> | 2001-10-29 13:05:28 +0000 |
|---|---|---|
| committer | Richard Levitte <levitte@openssl.org> | 2001-10-29 13:05:28 +0000 |
| commit | 7b5ffd683412b85d9b4195fc24b5966d41b591ae (patch) | |
| tree | 81fcc16df2eb38e7b8c29c7d8bccd026e340b047 /ssl/ssl-lib.com | |
| parent | 9b55da73ca195947ed664dbf9f093f05759afdd9 (diff) | |
| download | openssl-7b5ffd683412b85d9b4195fc24b5966d41b591ae.zip openssl-7b5ffd683412b85d9b4195fc24b5966d41b591ae.tar.gz openssl-7b5ffd683412b85d9b4195fc24b5966d41b591ae.tar.bz2 | |
Addapt VMS scripts to the newer disk layout system ODS-5, which allows more than one period and mixed size characters in file names
Diffstat (limited to 'ssl/ssl-lib.com')
| -rw-r--r-- | ssl/ssl-lib.com | 1 |
1 files changed, 1 insertions, 0 deletions
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]" $! |