From 33361058fecb6a90a8cc6efce41cc8d2b6587818 Mon Sep 17 00:00:00 2001
From: Jitka Plesnikova <jplesnik@redhat.com>
Date: Tue, 18 Feb 2025 15:00:18 +0100
Subject: [PATCH] Resolves: RHEL-77187

Fix permission for creating site directories
---
 ...temp-to-create-site-library-directories-on-first-t.patch | 2 +-
 perl-CPAN.spec                                              | 6 +++++-
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/CPAN-2.18-Attemp-to-create-site-library-directories-on-first-t.patch b/CPAN-2.18-Attemp-to-create-site-library-directories-on-first-t.patch
index cdf099d..7c15598 100644
--- a/CPAN-2.18-Attemp-to-create-site-library-directories-on-first-t.patch
+++ b/CPAN-2.18-Attemp-to-create-site-library-directories-on-first-t.patch
@@ -33,7 +33,7 @@ index 531c115..8d82795 100644
 +            $CPAN::Frontend->mywarn(sprintf(
 +                    qq{Perl site library directory "%s" does not exist.\n},
 +                $_));
-+            File::Path::make_path($_, { error => \my $failure });
++            File::Path::make_path($_, { error => \my $failure, chmod => 0755 });
 +            if (@$failure) {
 +                $CPAN::Frontend->mywarn(sprintf(
 +                        qq{Perl site library directory "%s" } .
diff --git a/perl-CPAN.spec b/perl-CPAN.spec
index d7877d8..bc43244 100644
--- a/perl-CPAN.spec
+++ b/perl-CPAN.spec
@@ -10,7 +10,7 @@
 
 Name:           perl-CPAN
 Version:        2.29
-Release:        3%{?dist}
+Release:        4%{?dist}
 Summary:        Query, download and build perl modules from CPAN sites
 License:        GPL+ or Artistic
 URL:            https://metacpan.org/release/CPAN
@@ -336,6 +336,10 @@ make test
 %{_libexecdir}/%{name}
 
 %changelog
+* Thu Feb 13 2025 Jitka Plesnikova <jplesnik@redhat.com> - 2.29-4
+- Resolves: RHEL-77187
+- Fix permission for creating site directories
+
 * Tue Aug 01 2023 Michal Josef Špaček <mspacek@redhat.com> - 2.29-3
 - Resolves: rhbz#2218907 - Fix CVE-2023-31484