diff options
| author | Craig A. Berry <craigberry@mac.com> | 2006-09-15 00:39:32 +0000 |
|---|---|---|
| committer | Craig A. Berry <craigberry@mac.com> | 2006-09-15 00:39:32 +0000 |
| commit | ccba5138c721ec441e594caee909f33438a87b7a (patch) | |
| tree | 95df3cc5e5d5818b54c65c69b95a8d33ebef622d /util.c | |
| parent | e24f8a798207476769992a3387804af506c43eab (diff) | |
| download | perl-ccba5138c721ec441e594caee909f33438a87b7a.tar.gz | |
More hacking in util.c's ifdef jungle following 28844 to avoid
duplicate definition of Perl_my_setenv on VMS.
p4raw-id: //depot/perl@28848
Diffstat (limited to 'util.c')
| -rw-r--r-- | util.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -1557,7 +1557,6 @@ Perl_new_warnings_bitfield(pTHX_ STRLEN *buffer, const char *const bits, *(s+(nlen+1+vlen)) = '\0' #if defined(USE_ENVIRON_ARRAY) && !defined(WIN32) && !defined(NETWARE) -/* VMS' my_setenv() is in vms.c */ void Perl_my_setenv(pTHX_ const char *nam, const char *val) { @@ -1660,7 +1659,7 @@ Perl_my_setenv(pTHX_ const char *nam, const char *val) } } -#else /* defined(USE_ENVIRON_ARRAY) && !defined(WIN32) && !defined(NETWARE)*/ +#elif !defined(VMS) /* VMS has my_setenv in vms.c */ void Perl_my_setenv(pTHX_ const char *nam, const char *val) |