From a8b4e4e2ea231c842f3ddfda242518a997ff3d90 Mon Sep 17 00:00:00 2001 From: Dan Goodliffe Date: Mon, 3 Jul 2023 20:05:28 +0100 Subject: Stop using do_open9 in mod_perl --- ...-991cfeca9bac185f191510e0064f174d45718e6a.patch | 28 ++++++++++++++++++++++ 1 file changed, 28 insertions(+) create mode 100644 www-apache/mod_perl/mod_perl-2.0.11-r1-991cfeca9bac185f191510e0064f174d45718e6a.patch 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 new file mode 100644 index 0000000..73cc0b2 --- /dev/null +++ b/www-apache/mod_perl/mod_perl-2.0.11-r1-991cfeca9bac185f191510e0064f174d45718e6a.patch @@ -0,0 +1,28 @@ +From 991cfeca9bac185f191510e0064f174d45718e6a Mon Sep 17 00:00:00 2001 +From: Steve Hay +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 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)); -- cgit v1.2.3