diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-02-26 07:46:35 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-02-26 07:46:35 +0000 |
commit | b53966b714702582c174d65358b25d017375948b (patch) | |
tree | 587fd6e4de58b7dbc5f69934c8decd9a72ba9e9d /configure.com | |
parent | ffb04cf170fa14d0606f2c3643c438d43784ee46 (diff) | |
parent | 2841d78411ddadd05a6fbe13e0be06f765fad3fb (diff) | |
download | perl-b53966b714702582c174d65358b25d017375948b.tar.gz |
integrate vmsperl changes into mainline
p4raw-id: //depot/perl@5270
Diffstat (limited to 'configure.com')
-rw-r--r-- | configure.com | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/configure.com b/configure.com index 813127ca4d..af423858d4 100644 --- a/configure.com +++ b/configure.com @@ -167,8 +167,8 @@ $ P'i' = P'i' - "f" $ config_sh = P'i' $ IF (F$SEARCH(config_sh).NES."") $ THEN -$ test = F$FILE_ATTRIBUTES(config_sh,"PRO") -$ IF (F$LOCATE("R",test).NE.F$LENGTH(test)) +$ test_config_sh = F$FILE_ATTRIBUTES(config_sh,"PRO") +$ IF (F$LOCATE("R",test_config_sh).NE.F$LENGTH(test_config_sh)) $ THEN $ CONTINUE !at this point check UIC && if test allows... $ !to be continued ? @@ -2084,7 +2084,7 @@ $ ENDIF $ EXIT $ ENDSUBROUTINE ! Bad_environment $ echo "" -$ echo4 "%Config-I-VMS, Checking for dangerous pre extant global symbols and logical names." +$ echo4 "%Config-I-VMS, Checking for dangerous pre-existing global symbols and logical names." $ CALL Bad_environment "TMP" $ CALL Bad_environment "LIB" $ CALL Bad_environment "T" |