diff options
| author | Richard Levitte <richard@levitte.org> | 2014-06-16 13:24:04 +0200 |
|---|---|---|
| committer | Richard Levitte <richard@levitte.org> | 2014-06-16 13:25:16 +0200 |
| commit | b9c0dae28e9eaa0d664e4acd382986942f8afbaa (patch) | |
| tree | f2b89b42bd3ba43f034686811ccc5e20012197da /crypto/crypto-lib.com | |
| parent | d940b3b9c7f6014f297a4d6f1b3c02e68c1c3291 (diff) | |
Spaces were added in some strings for better readability. However, those spaces do not belong in file names, so when picking out the individual parts, remove the spaces
Diffstat (limited to 'crypto/crypto-lib.com')
| -rw-r--r-- | crypto/crypto-lib.com | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/crypto/crypto-lib.com b/crypto/crypto-lib.com index 48da870201..3537627fa2 100644 --- a/crypto/crypto-lib.com +++ b/crypto/crypto-lib.com @@ -381,7 +381,7 @@ $ MODULE_NEXT: $! $! Extract The Module Name From The Encryption List. $! -$ MODULE_NAME = F$ELEMENT(MODULE_COUNTER,",",ENCRYPT_TYPES) +$ MODULE_NAME = F$EDIT(F$ELEMENT(MODULE_COUNTER,",",ENCRYPT_TYPES),"COLLAPSE") $ IF MODULE_NAME.EQS."Basic" THEN MODULE_NAME = "" $ MODULE_NAME1 = MODULE_NAME $! @@ -465,7 +465,7 @@ $ THEN $! $! O.K, Extract The File Name From The File List. $! -$ FILE_NAME = F$ELEMENT(FILE_COUNTER,",",'LIB_MODULE') +$ FILE_NAME = F$EDIT(F$ELEMENT(FILE_COUNTER,",",'LIB_MODULE'),"COLLAPSE") $! $! else $! @@ -492,7 +492,7 @@ $! SHOW SYMBOL APPLICATION* $! $ IF APPLICATION .NES. ";" $ THEN -$ FILE_NAME = F$ELEMENT(FILE_COUNTER,",",APPLICATION_OBJECTS) +$ FILE_NAME = F$EDIT(F$ELEMENT(FILE_COUNTER,",",APPLICATION_OBJECTS),"COLLAPSE") $ IF FILE_NAME .EQS. "," $ THEN $ APPLICATION = "" |