diff options
| author | markm <markm@FreeBSD.org> | 2001-03-22 23:17:46 +0800 |
|---|---|---|
| committer | markm <markm@FreeBSD.org> | 2001-03-22 23:17:46 +0800 |
| commit | 9dce7ddd34b7a05a7dc9e55d8131e5e1c1734d25 (patch) | |
| tree | a1afb15b9f139bb62ddd956d3951df423ce398b3 /lang/perl5/files | |
| parent | 80c9e8c37c6883e7c56a54646586ba666dc9d2c0 (diff) | |
| download | freebsd-ports-gnome-9dce7ddd34b7a05a7dc9e55d8131e5e1c1734d25.tar.gz freebsd-ports-gnome-9dce7ddd34b7a05a7dc9e55d8131e5e1c1734d25.tar.zst freebsd-ports-gnome-9dce7ddd34b7a05a7dc9e55d8131e5e1c1734d25.zip | |
Upgrade this to perl5.6.0 for _knowledgeable_ folks in STABLE who
really want it.
This is still marked FORBIDDEN as there may be all sorts of horrible
incompatabilities with the perl5 in "base", but folks who are willing
to override this and experiment are welcome.
Consider this to be only partially supported. I'll happily commit
patches and fixes, but I don't want to answer too many questions.
Sorry!
Diffstat (limited to 'lang/perl5/files')
| -rw-r--r-- | lang/perl5/files/patch-ad | 23 | ||||
| -rw-r--r-- | lang/perl5/files/patch-ae | 4 |
2 files changed, 2 insertions, 25 deletions
diff --git a/lang/perl5/files/patch-ad b/lang/perl5/files/patch-ad index 47f99960867e..110416dab3da 100644 --- a/lang/perl5/files/patch-ad +++ b/lang/perl5/files/patch-ad @@ -16,26 +16,3 @@ /* Use all the "standard" definitions? */ #if defined(STANDARD_C) && defined(I_STDLIB) ---- perl.c.ORIG Thu Jul 30 17:04:23 1998 -+++ perl.c Thu Jul 30 17:04:57 1998 -@@ -2124,6 +2124,20 @@ - croak("Can't swap uid and euid"); /* really paranoid */ - if (PerlLIO_stat(SvPVX(GvSV(PL_curcop->cop_filegv)),&tmpstatbuf) < 0) - croak("Permission denied"); /* testing full pathname here */ -+#if (defined(BSD) && (BSD >= 199306)) -+#ifdef IAMSUID -+ { -+ struct statfs stfs; -+ -+ if (fstatfs(fileno(PL_rsfp),&stfs) < 0) -+ croak("Can't statfs filesystem of script \"%s\"",PL_origfilename); -+ -+ if (stfs.f_flags & MNT_NOSUID) -+ croak("Permission denied"); -+ } -+#endif /* IAMSUID */ -+#endif /* BSD */ -+ - if (tmpstatbuf.st_dev != PL_statbuf.st_dev || - tmpstatbuf.st_ino != PL_statbuf.st_ino) { - (void)PerlIO_close(PL_rsfp); diff --git a/lang/perl5/files/patch-ae b/lang/perl5/files/patch-ae index c701adb3382b..24dfa020a53b 100644 --- a/lang/perl5/files/patch-ae +++ b/lang/perl5/files/patch-ae @@ -1,9 +1,9 @@ --- makedepend.SH.ORIG Fri Jul 24 06:00:58 1998 +++ makedepend.SH Thu Jul 30 17:08:37 1998 -@@ -67,6 +67,7 @@ - # to be out of date. I don't know if OS/2 has touch, so do this: +@@ -68,6 +68,7 @@ case "$osname" in os2) ;; + netbsd) ;; + freebsd) ;; *) $touch $firstmakefile ;; esac |