diff options
author | Dan Goodliffe <dan.goodliffe@octal.co.uk> | 2023-07-05 15:54:14 +0100 |
---|---|---|
committer | Dan Goodliffe <dan.goodliffe@octal.co.uk> | 2023-07-05 15:54:14 +0100 |
commit | f77045c82b2cd927e5840bb67caa4b15a739d21f (patch) | |
tree | b307e390d69d775b4f0ae9b3c1fa424a34765656 | |
parent | Stop using do_open9 in mod_perl (diff) | |
download | patches-f77045c82b2cd927e5840bb67caa4b15a739d21f.tar.bz2 patches-f77045c82b2cd927e5840bb67caa4b15a739d21f.tar.xz patches-f77045c82b2cd927e5840bb67caa4b15a739d21f.zip |
Revert "Stop using do_open9 in mod_perl"
This reverts commit a8b4e4e2ea231c842f3ddfda242518a997ff3d90.
-rw-r--r-- | www-apache/mod_perl/mod_perl-2.0.11-r1-991cfeca9bac185f191510e0064f174d45718e6a.patch | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/www-apache/mod_perl/mod_perl-2.0.11-r1-991cfeca9bac185f191510e0064f174d45718e6a.patch b/www-apache/mod_perl/mod_perl-2.0.11-r1-991cfeca9bac185f191510e0064f174d45718e6a.patch deleted file mode 100644 index 73cc0b2..0000000 --- a/www-apache/mod_perl/mod_perl-2.0.11-r1-991cfeca9bac185f191510e0064f174d45718e6a.patch +++ /dev/null @@ -1,28 +0,0 @@ -From 991cfeca9bac185f191510e0064f174d45718e6a Mon Sep 17 00:00:00 2001 -From: Steve Hay <stevehay@apache.org> -Date: Tue, 27 Jun 2023 08:38:15 +0000 -Subject: [PATCH] Stop using do_open9() - this deprecated function was removed - in 5.37.1 - -Patch by Jitka Plesnikova <jplesnik@redhat.com> from https://rt.cpan.org/Ticket/Display.html?id=148451 - -git-svn-id: https://svn.apache.org/repos/asf/perl/modperl/trunk@1910623 13f79535-47bb-0310-9956-ffa450edef68 ---- - src/modules/perl/modperl_io.c | 4 ++-- - 1 file changed, 2 insertions(+), 2 deletions(-) - -diff --git a/src/modules/perl/modperl_io.c b/src/modules/perl/modperl_io.c -index 608ce3dd..7a0baf03 100644 ---- a/src/modules/perl/modperl_io.c -+++ b/src/modules/perl/modperl_io.c -@@ -116,8 +116,8 @@ modperl_io_perlio_override_stdhandle(pTHX_ request_rec *r, int mode) - save_gp(handle, 1); - - sv_setref_pv(sv, "Apache2::RequestRec", (void*)r); -- status = do_open9(handle, mode == O_RDONLY ? "<:Apache2" : ">:Apache2", -- 9, FALSE, mode, 0, (PerlIO *)NULL, sv, 1); -+ status = do_openn(handle, mode == O_RDONLY ? "<:Apache2" : ">:Apache2", -+ 9, FALSE, mode, 0, (PerlIO *)NULL, &sv, 1); - if (status == 0) { - Perl_croak(aTHX_ "Failed to open STD%s: %" SVf, - mode == O_RDONLY ? "IN" : "OUT", get_sv("!", TRUE)); |