aboutsummaryrefslogtreecommitdiffstats
path: root/lang/perl5.16/files
diff options
context:
space:
mode:
authorskv <skv@FreeBSD.org>2009-02-16 06:42:37 +0800
committerskv <skv@FreeBSD.org>2009-02-16 06:42:37 +0800
commit9e38c9599eb64bd7662f82de9da2b7bc3bbf6abd (patch)
treefdd675b844bdbb4df0ea53149578af953a08536f /lang/perl5.16/files
parent35e0a6f1aa2a9b40b2b8de9f374863b5d414ffac (diff)
downloadfreebsd-ports-gnome-9e38c9599eb64bd7662f82de9da2b7bc3bbf6abd.tar.gz
freebsd-ports-gnome-9e38c9599eb64bd7662f82de9da2b7bc3bbf6abd.tar.zst
freebsd-ports-gnome-9e38c9599eb64bd7662f82de9da2b7bc3bbf6abd.zip
* Fix suidperl functionality. [1]
* Update BSDPAN. PR: ports/131434 [1] Submitted by: William Olson <wolson xx gmail.com> [1]
Diffstat (limited to 'lang/perl5.16/files')
-rw-r--r--lang/perl5.16/files/patch-perl.c9
1 files changed, 9 insertions, 0 deletions
diff --git a/lang/perl5.16/files/patch-perl.c b/lang/perl5.16/files/patch-perl.c
index e9cd514c8868..8e91bd68b9e6 100644
--- a/lang/perl5.16/files/patch-perl.c
+++ b/lang/perl5.16/files/patch-perl.c
@@ -1,5 +1,14 @@
--- perl.c
+++ perl.c
+@@ -3724,7 +3724,7 @@
+ * perl with that fd as it has always done.
+ */
+ }
+- if (*suidscript) {
++ if (*suidscript != TRUE) {
+ Perl_croak(aTHX_ "suidperl needs (suid) fd script\n");
+ }
+ #else /* IAMSUID */
@@ -4882,6 +4882,28 @@
incpush(APPLLIB_EXP, TRUE, TRUE, TRUE, TRUE);
#endif