commit apache2-mod_perl for openSUSE:Factory

[Source-Sync]

Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package apache2-mod_perl for 
openSUSE:Factory checked in at 2023-08-17 19:43:47
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/apache2-mod_perl (Old)
 and      /work/SRC/openSUSE:Factory/.apache2-mod_perl.new.1766 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "apache2-mod_perl"

Thu Aug 17 19:43:47 2023 rev:48 rq:1104178 version:2.0.12

Changes:
--------
--- /work/SRC/openSUSE:Factory/apache2-mod_perl/apache2-mod_perl.changes        
2022-04-22 21:55:28.566889533 +0200
+++ 
/work/SRC/openSUSE:Factory/.apache2-mod_perl.new.1766/apache2-mod_perl.changes  
    2023-08-17 19:44:01.866843872 +0200
@@ -1,0 +2,6 @@
+Tue Aug  8 09:38:00 UTC 2023 - Dominique Leuenberger <dims...@opensuse.org>
+
+- Add apache2-mod_perl-perl-5.38.patch: Fix build with Perl 5.38.
+  Usptream rev 1910623.
+
+-------------------------------------------------------------------

New:
----
  apache2-mod_perl-perl-5.38.patch

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ apache2-mod_perl.spec ++++++
--- /var/tmp/diff_new_pack.hO9wKl/_old  2023-08-17 19:44:03.034846056 +0200
+++ /var/tmp/diff_new_pack.hO9wKl/_new  2023-08-17 19:44:03.042846071 +0200
@@ -1,7 +1,7 @@
 #
 # spec file for package apache2-mod_perl
 #
-# Copyright (c) 2022 SUSE LLC
+# Copyright (c) 2023 SUSE LLC
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -30,6 +30,7 @@
 Patch1:         avoid-broken-provides.diff
 # bsc#1091625, workaround, according to mls it should be solved in perl
 Patch2:         apache2-mod_perl-prctl-short-name.patch
+Patch3:         apache2-mod_perl-perl-5.38.patch
 BuildRequires:  apache-rpm-macros
 BuildRequires:  apache2-devel
 BuildRequires:  db-devel
@@ -81,9 +82,7 @@
 software depending on apache2-mod_perl.
 
 %prep
-%setup -q -n %{srcname}-%{version}
-%patch1 -p1
-%patch2 -p1
+%autosetup -n %{srcname}-%{version} -p1
 
 %build
 perl Makefile.PL INSTALLDIRS=vendor MP_APXS=%{apache_apxs} 
MP_APR_CONFIG=%{_bindir}/apr-1-config MP_CCOPTS="%{apache_cflags} 
-fgnu89-inline"

++++++ apache2-mod_perl-perl-5.38.patch ++++++
--- trunk/src/modules/perl/modperl_io.c 2014/06/12 09:29:09     1602105
+++ trunk/src/modules/perl/modperl_io.c 2023/06/27 08:38:15     1910623
@@ -116,8 +116,8 @@
     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));