summaryrefslogtreecommitdiff
path: root/mg.c
diff options
context:
space:
mode:
authorOlaf Flebbe <o.flebbe@science-computing.de>2000-09-21 01:16:26 +0200
committerJarkko Hietaniemi <jhi@iki.fi>2000-10-03 00:34:59 +0000
commited79a026b5aec9cc3f786c2971aa15a4b21f396c (patch)
treeb0e2bf3556083784ba28cbb74402f950712d81d9 /mg.c
parent444155da6cc74bc317db82ecaa4272f5cf6d3c9b (diff)
downloadperl-ed79a026b5aec9cc3f786c2971aa15a4b21f396c.tar.gz
Epoc update
Message-ID: <26423.969484586@www10.gmx.net> p4raw-id: //depot/perl@7124
Diffstat (limited to 'mg.c')
-rw-r--r--mg.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/mg.c b/mg.c
index 1cfaf051e3..721cfb9c34 100644
--- a/mg.c
+++ b/mg.c
@@ -914,7 +914,7 @@ Perl_magic_set_all_env(pTHX_ SV *sv, MAGIC *mg)
int
Perl_magic_clear_all_env(pTHX_ SV *sv, MAGIC *mg)
{
-#if defined(VMS)
+#if defined(VMS) || defined(EPOC)
Perl_die(aTHX_ "Can't make list assignment to %%ENV on this system");
#else
# ifdef PERL_IMPLICIT_SYS