From 272412aade238dcf5a7b6417893b3a4fc48a42c3 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@redhat.com>
Date: Tue, 10 Dec 2019 14:46:21 +0100
Subject: [PATCH] Subpackage File-Find

---
 gendep.macros | 12 +++++++++++-
 perl.spec     | 29 ++++++++++++++++++++++++++++-
 2 files changed, 39 insertions(+), 2 deletions(-)

diff --git a/gendep.macros b/gendep.macros
index c4c66ee..fb3e7e7 100644
--- a/gendep.macros
+++ b/gendep.macros
@@ -641,6 +641,17 @@ Requires: perl(strict) \
 Requires: perl(vars) \
 Provides: perl(File::Fetch) = 0.56 \
 %{nil}
+%global gendep_perl_File_Find \
+Requires: perl(:VERSION) >= 5.6.0 \
+Requires: perl(Cwd) \
+Requires: perl(Exporter) \
+Requires: perl(File::Basename) \
+Requires: perl(File::Spec) \
+Requires: perl(strict) \
+Requires: perl(warnings) \
+Requires: perl(warnings::register) \
+Provides: perl(File::Find) = 1.36 \
+%{nil}
 %global gendep_perl_File_Path \
 Requires: perl(:VERSION) >= 5.5.0 \
 Requires: perl(Cwd) \
@@ -1959,7 +1970,6 @@ Provides: perl(Fcntl) = 1.13 \
 Provides: perl(File::Basename) = 2.85 \
 Provides: perl(File::Compare) = 1.1006 \
 Provides: perl(File::Copy) = 2.34 \
-Provides: perl(File::Find) = 1.36 \
 Provides: perl(File::stat) = 1.08 \
 Provides: perl(FileCache) = 1.10 \
 Provides: perl(FileHandle) = 2.03 \
diff --git a/perl.spec b/perl.spec
index 57b203f..9dc5b25 100644
--- a/perl.spec
+++ b/perl.spec
@@ -386,7 +386,7 @@ Requires:       perl-ExtUtils-Embed, perl-ExtUtils-Install,
 Requires:       perl-ExtUtils-MakeMaker, perl-ExtUtils-Manifest,
 Requires:       perl-ExtUtils-Miniperl, perl-ExtUtils-ParseXS,
 Requires:       perl-fields, perl-File-DosGlob, perl-File-Fetch,
-Requires:       perl-File-Path, perl-File-Temp,
+Requires:       perl-File-Find, perl-File-Path, perl-File-Temp,
 Requires:       perl-Filter, perl-Filter-Simple,
 %if %{with gdbm}
 Requires:       perl-GDBM_File,
@@ -1669,6 +1669,23 @@ BuildArch:      noarch
 File::Fetch is a generic file fetching mechanism.
 %endif
 
+%package File-Find
+Summary:        Traverse a directory tree
+License:        GPL+ or Artistic
+Epoch:          0
+Version:        1.36
+Requires:       %perl_compat
+Recommends:     perl(Scalar::Util)
+%if %{defined perl_bootstrap}
+%gendep_perl_File_Find
+%endif
+BuildArch:      noarch
+Conflicts:      perl-interpreter < 4:5.30.1-451
+
+%description File-Find
+These are functions for searching through directory trees doing work on each
+file found similar to the Unix find command.
+
 %if %{dual_life} || %{rebuild_from_scratch}
 %package File-Path
 Summary:        Create or remove directory trees
@@ -4140,6 +4157,10 @@ popd
 %exclude %{privlib}/File/Fetch.pm
 %exclude %{_mandir}/man3/File::Fetch.3*
 
+# File-Find
+%exclude %{privlib}/File/Find.pm
+%exclude %{_mandir}/man3/File::Find.3*
+
 # File-Path
 %exclude %{privlib}/File/Path.pm
 %exclude %{_mandir}/man3/File::Path.3*
@@ -5218,6 +5239,11 @@ popd
 %{_mandir}/man3/File::Fetch.3*
 %endif
 
+%files File-Find
+%dir %{privlib}/File
+%{privlib}/File/Find.pm
+%{_mandir}/man3/File::Find.3*
+
 %if %{dual_life} || %{rebuild_from_scratch}
 %files File-Path
 %dir %{privlib}/File
@@ -5988,6 +6014,7 @@ popd
 - Subpackage SDBM_File
 - Move File::Glob module into perl-libs
 - Subpackage File-DosGlob
+- Subpackage File-Find
 
 * Wed Jan 29 2020 Fedora Release Engineering <releng@fedoraproject.org> - 4:5.30.1-450
 - Rebuilt for https://fedoraproject.org/wiki/Fedora_32_Mass_Rebuild