From cfef31b27d1a56cda74e23698243f3be70bd9cb3 Mon Sep 17 00:00:00 2001 From: Jan Dubois Date: Wed, 21 Jul 2010 18:28:33 -0700 Subject: Get rid of PERL_POLLUTE PERL_POLLUTE was added (but undefined by default) in 5.6 to optionally expose older 5.005 symbols for backwards compatibility. It's use was always discouraged, and MakeMaker contains a more specific escape hatch: perl Makefile.PL POLLUTE=1 This can be used for modules that have not been upgraded to 5.6 naming conventions (and really should be completely obsolete by now). --- embed.pl | 12 ------------ 1 file changed, 12 deletions(-) (limited to 'embed.pl') diff --git a/embed.pl b/embed.pl index 9c55cb4b65..fea46df98f 100755 --- a/embed.pl +++ b/embed.pl @@ -745,18 +745,6 @@ print $em <<'END'; #endif /* PERL_GLOBAL_STRUCT */ -#ifdef PERL_POLLUTE /* disabled by default in 5.6.0 */ - -END - -for $sym (sort @extvars) { - print $em hide($sym,"PL_$sym"); -} - -print $em <<'END'; - -#endif /* PERL_POLLUTE */ - /* ex: set ro: */ END -- cgit v1.2.1