diff options
| author | tobez <tobez@FreeBSD.org> | 2002-10-29 23:47:13 +0800 |
|---|---|---|
| committer | tobez <tobez@FreeBSD.org> | 2002-10-29 23:47:13 +0800 |
| commit | 1159ed27664a342f330d641bf184ea82b7e65d01 (patch) | |
| tree | f18bef485230889cbc73f7adc0aa80eec36b4b8f /lang/perl5.6 | |
| parent | 1e2420797f97a790878d553d5001c16ecb36a776 (diff) | |
| download | freebsd-ports-gnome-1159ed27664a342f330d641bf184ea82b7e65d01.tar.gz freebsd-ports-gnome-1159ed27664a342f330d641bf184ea82b7e65d01.tar.zst freebsd-ports-gnome-1159ed27664a342f330d641bf184ea82b7e65d01.zip | |
Fix a bug in perl 5.6.1 described in
http://archive.develooper.com/perl5-porters@perl.org/msg58812.html
with a patch from
http://archive.develooper.com/perl5-porters@perl.org/msg58819.html
While we normally do not fix non-FreeBSD problems with 3rd party
software, it is expected that perl 5.6.1 will be used widely for some
time to come, and the bug is bad enough to grant the inclusion of the
patch here.
Diffstat (limited to 'lang/perl5.6')
| -rw-r--r-- | lang/perl5.6/Makefile | 2 | ||||
| -rw-r--r-- | lang/perl5.6/files/patch-mg.c | 11 |
2 files changed, 12 insertions, 1 deletions
diff --git a/lang/perl5.6/Makefile b/lang/perl5.6/Makefile index d88341c43852..e7ec4e3e6fb4 100644 --- a/lang/perl5.6/Makefile +++ b/lang/perl5.6/Makefile @@ -7,7 +7,7 @@ PORTNAME= perl PORTVERSION= ${PERL_VER} -PORTREVISION= 8 +PORTREVISION= 9 CATEGORIES= lang devel perl5 MASTER_SITES= ${MASTER_SITE_PERL_CPAN} \ ${MASTER_SITE_LOCAL:S/$/:local/} diff --git a/lang/perl5.6/files/patch-mg.c b/lang/perl5.6/files/patch-mg.c new file mode 100644 index 000000000000..c9ef2a1322b0 --- /dev/null +++ b/lang/perl5.6/files/patch-mg.c @@ -0,0 +1,11 @@ +--- mg.c.orig Tue Oct 29 16:24:52 2002 ++++ mg.c Tue Oct 29 16:32:26 2002 +@@ -562,6 +562,8 @@ Perl_magic_get(pTHX_ SV *sv, MAGIC *mg) + (void)SvOK_off(sv); + else if (PL_in_eval) + sv_setiv(sv, PL_in_eval & ~(EVAL_INREQUIRE)); ++ else ++ sv_setiv(sv, 0); + } + break; + case '\024': /* ^T */ |