aboutsummaryrefslogtreecommitdiff
path: root/lang/perl5.12/files/patch-perl.c
diff options
context:
space:
mode:
authorSergey Skvortsov <skv@FreeBSD.org>2009-02-15 22:42:37 +0000
committerSergey Skvortsov <skv@FreeBSD.org>2009-02-15 22:42:37 +0000
commite13b7326f81143a42ee7cbdb934d838a037450e4 (patch)
tree9dc3e6258695027f0acc1d7a431de01f18ffda85 /lang/perl5.12/files/patch-perl.c
parent3270c6f5ea9a2b4fcc3679ae221e389ca4551387 (diff)
Notes
Diffstat (limited to 'lang/perl5.12/files/patch-perl.c')
-rw-r--r--lang/perl5.12/files/patch-perl.c9
1 files changed, 9 insertions, 0 deletions
diff --git a/lang/perl5.12/files/patch-perl.c b/lang/perl5.12/files/patch-perl.c
index e9cd514c8868..8e91bd68b9e6 100644
--- a/lang/perl5.12/files/patch-perl.c
+++ b/lang/perl5.12/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