diff options
| author | Anton Berezin <tobez@FreeBSD.org> | 2005-06-24 09:17:06 +0000 |
|---|---|---|
| committer | Anton Berezin <tobez@FreeBSD.org> | 2005-06-24 09:17:06 +0000 |
| commit | cb044765cac302a6d2f050170f3c803917d5eb06 (patch) | |
| tree | e35a39ee6e0eb95d1d1d187baa9e89dd51f115fa /lang/perl5.8/files/patch-perlio.c | |
| parent | Document linux-realplayer -- RealText parsing heap overflow. (diff) | |
Upgrade to 5.8.7. In addition:
- add perl-after-upgrade utility to move around
dependent packages
- fix $0 expansion in use.perl [1]
- enable threaded perl on amd64 [2]
- always compile perl with -pthread [3]
- fix errno issue in SDBM_File [4]
- add support for // and err (defined-or) [5]
- add WITH_DEBUGGING option [6]
- fix suidperl symlink [7]
- fix several small bugs in use.perl
- print possible WITH_XXX flags (no OPTIONS support yet)
[1] Submitted by: erwin, Niël Dogger <niel@introweb.nl>
[2] Nudged by: Mike Schroll <FreeBSD@LogicX.us>
[3] Nudged by: skv
[4] perl bug #35938
[5] Obtained from: H.Merijn Brand <h.m.brand@xs4all.nl>
[6] PR: 78811, submitted by: skv
[7] PR: 80069, submitted by: Sergey N. Voronkov <serg@tmn.ru>
A different solution was actually implemented.
Notes
Notes:
svn path=/head/; revision=137960
Diffstat (limited to 'lang/perl5.8/files/patch-perlio.c')
| -rw-r--r-- | lang/perl5.8/files/patch-perlio.c | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/lang/perl5.8/files/patch-perlio.c b/lang/perl5.8/files/patch-perlio.c deleted file mode 100644 index c680381d2123..000000000000 --- a/lang/perl5.8/files/patch-perlio.c +++ /dev/null @@ -1,22 +0,0 @@ -$FreeBSD$ - ---- perlio.c.orig Wed Feb 2 16:45:24 2005 -+++ perlio.c Wed Feb 2 16:45:34 2005 -@@ -454,7 +454,7 @@ PerlIO_debug(const char *fmt, ...) - va_list ap; - dSYS; - va_start(ap, fmt); -- if (!dbg) { -+ if (!dbg && !PL_tainting && PL_uid == PL_euid && PL_gid == PL_egid) { - char *s = PerlEnv_getenv("PERLIO_DEBUG"); - if (s && *s) - dbg = PerlLIO_open3(s, O_WRONLY | O_CREAT | O_APPEND, 0666); -@@ -471,7 +471,7 @@ PerlIO_debug(const char *fmt, ...) - s = CopFILE(PL_curcop); - if (!s) - s = "(none)"; -- sprintf(buffer, "%s:%" IVdf " ", s, (IV) CopLINE(PL_curcop)); -+ sprintf(buffer, "%.40s:%" IVdf " ", s, (IV) CopLINE(PL_curcop)); - len = strlen(buffer); - vsprintf(buffer+len, fmt, ap); - PerlLIO_write(dbg, buffer, strlen(buffer)); |