summaryrefslogtreecommitdiff
path: root/util.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2000-10-03 00:57:08 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2000-10-03 00:57:08 +0000
commit13b6e58cb5ac4fa23568d2f76512a5830dbb1688 (patch)
tree611d23bd70ad0cd205b059d28403ba79d13a0699 /util.c
parent5a814814cd51e244388e778feeaca28d5d78d95b (diff)
downloadperl-13b6e58cb5ac4fa23568d2f76512a5830dbb1688.tar.gz
Introduce NO_ENVIRON_ARRAY (and USE_ENVIRON_ARRAY) defines
as suggested by Olaf Flebbe and Nicholas Clark. p4raw-id: //depot/perl@7126
Diffstat (limited to 'util.c')
-rw-r--r--util.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/util.c b/util.c
index 2548f509c9..0c26f8310b 100644
--- a/util.c
+++ b/util.c
@@ -1934,9 +1934,9 @@ Perl_vwarner(pTHX_ U32 err, const char* pat, va_list* args)
}
}
-#if !defined( VMS) && !defined(EPOC)
- /* VMS' and EPOC's my_setenv() is in VMS.c */
-#if !defined(WIN32) && !defined(__CYGWIN__) &&
+#ifdef USE_ENVIRON_ARRAY
+ /* VMS' and EPOC's my_setenv() is in vms.c and epoc.c */
+#if !defined(WIN32) && !defined(__CYGWIN__)
void
Perl_my_setenv(pTHX_ char *nam, char *val)
{