diff --git a/gendep.macros b/gendep.macros index 9325e19..5c26bf8 100644 --- a/gendep.macros +++ b/gendep.macros @@ -811,6 +811,9 @@ Requires: perl(IO::File) \ Requires: perl(strict) \ Provides: perl(FileHandle) = 2.03 \ %{nil} +%global gendep_perl_filetest \ +Provides: perl(filetest) = 1.03 \ +%{nil} %global gendep_perl_Filter \ Requires: perl(:VERSION) >= 5.6.0 \ Requires: perl(Exporter) \ @@ -2210,7 +2213,6 @@ Provides: perl(DB) = 1.08 \ Provides: perl(EVERY::LAST) \ Provides: perl(Pod::Functions) = 1.13 \ Provides: perl(dumpvar.pl) \ -Provides: perl(filetest) = 1.03 \ Provides: perl(less) = 0.03 \ Provides: perl(perl5db.pl) \ Provides: perl(sigtrap) = 1.09 \ diff --git a/perl.spec b/perl.spec index 8a6e277..6139ad6 100644 --- a/perl.spec +++ b/perl.spec @@ -394,7 +394,7 @@ Requires: perl-Fcntl, perl-feature, perl-fields, Requires: perl-File-Basename, perl-File-Compare, perl-File-Copy, Requires: perl-File-DosGlob, perl-File-Fetch, Requires: perl-File-Find, perl-File-Path, perl-File-stat, perl-File-Temp, -Requires: perl-FileCache, perl-FileHandle, +Requires: perl-FileCache, perl-FileHandle, perl-filetest, Requires: perl-Filter, perl-Filter-Simple, Requires: perl-FindBin, %if %{with gdbm} @@ -2102,6 +2102,26 @@ Conflicts: perl-interpreter < 4:5.30.1-451 This is an object-oriented interface for opening files and performing input/output operations on them. +%package filetest +Summary: Perl pragma to control the filetest permission operators +License: GPL+ or Artistic +Epoch: 0 +Version: 1.03 +BuildArch: noarch +Requires: %perl_compat +%if %{defined perl_bootstrap} +%gendep_perl_filetest +%endif +Conflicts: perl < 4:5.30.1-451 + +%description filetest +The default behavior of file test operators (e.g. "-r") is to use the simple +mode bits as returned by the stat() family of system calls. However, many +operating systems have additional features to define more complex access +rights, for example ACLs (Access Control Lists). For such environments, "use +filetest" may help the permission operators to return results more consistent +with other tools. + %if %{dual_life} || %{rebuild_from_scratch} # FIXME Filter-Simple? version? %package Filter @@ -5037,6 +5057,10 @@ popd %exclude %{privlib}/FileHandle.pm %exclude %{_mandir}/man3/FileHandle.3* +# filetest +%exclude %{privlib}/filetest.pm +%exclude %{_mandir}/man3/filetest.3* + # Filter %exclude %dir %{archlib}/auto/Filter %exclude %{archlib}/auto/Filter/Util @@ -6385,6 +6409,10 @@ popd %{privlib}/FileHandle.pm %{_mandir}/man3/FileHandle.3* +%files filetest +%{privlib}/filetest.pm +%{_mandir}/man3/filetest.3* + %if %{dual_life} || %{rebuild_from_scratch} %files Filter %dir %{archlib}/auto/Filter @@ -7319,6 +7347,7 @@ popd - Move UNIVERSAL to perl-libs - Subpackage DynaLoader - Subpackage feature +- Subpackage filetest * Wed Jan 29 2020 Fedora Release Engineering - 4:5.30.1-450 - Rebuilt for https://fedoraproject.org/wiki/Fedora_32_Mass_Rebuild