commit 040f66123a271ca95d711247690f7ae96d8513e8 Author: James Antill Date: Mon Feb 20 02:02:35 2023 -0500 Import rpm: d5271f05b3c98c60127ac0e55fb6ffe2045f5b61 diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..839ef51 --- /dev/null +++ b/.gitignore @@ -0,0 +1 @@ +SOURCES/Filter-Simple-0.91.tar.gz diff --git a/.rpmlint b/.rpmlint new file mode 100644 index 0000000..cec8f88 --- /dev/null +++ b/.rpmlint @@ -0,0 +1,2 @@ +from Config import * +addFilter("spelling-error .* Util"); diff --git a/Filter-Simple-0.91-Upgrade-to-0.92.patch b/Filter-Simple-0.91-Upgrade-to-0.92.patch new file mode 100644 index 0000000..6e8b04f --- /dev/null +++ b/Filter-Simple-0.91-Upgrade-to-0.92.patch @@ -0,0 +1,40 @@ +From ae5f5addc848a6e80707f625db58cbb9a633aea7 Mon Sep 17 00:00:00 2001 +From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= +Date: Wed, 6 May 2015 10:10:46 +0200 +Subject: [PATCH] Upgrade to 0.92 +MIME-Version: 1.0 +Content-Type: text/plain; charset=UTF-8 +Content-Transfer-Encoding: 8bit + +Signed-off-by: Petr Písař +--- + lib/Filter/Simple.pm | 6 +++--- + 1 file changed, 3 insertions(+), 3 deletions(-) + +diff --git a/lib/Filter/Simple.pm b/lib/Filter/Simple.pm +index 4b15e55..8212919 100644 +--- a/lib/Filter/Simple.pm ++++ b/lib/Filter/Simple.pm +@@ -4,7 +4,7 @@ use Text::Balanced ':ALL'; + + use vars qw{ $VERSION @EXPORT }; + +-$VERSION = '0.91'; ++$VERSION = '0.92'; + + use Filter::Util::Call; + use Carp; +@@ -119,8 +119,8 @@ sub gen_std_filter_for { + } + if ($type =~ /^code/) { + my $count = 0; +- local $placeholder = qr/\Q$;\E(\C{4})\Q$;\E/; +- my $extractor = qr/\Q$;\E(\C{4})\Q$;\E/; ++ local $placeholder = qr/\Q$;\E(.{4})\Q$;\E/s; ++ my $extractor = qr/\Q$;\E(.{4})\Q$;\E/s; + $_ = join "", + map { ref $_ ? $;.pack('N',$count++).$; : $_ } + @components; +-- +2.1.0 + diff --git a/Filter-Simple-0.94-Upgrade-to-0.95.patch b/Filter-Simple-0.94-Upgrade-to-0.95.patch new file mode 100644 index 0000000..eac02ea --- /dev/null +++ b/Filter-Simple-0.94-Upgrade-to-0.95.patch @@ -0,0 +1,54 @@ +From 593fb3d6c0fcff266729d1d497d931e7e3ad9a83 Mon Sep 17 00:00:00 2001 +From: Jitka Plesnikova +Date: Thu, 24 May 2018 10:20:55 +0200 +Subject: [PATCH] Upgrade to 0.95 + +--- + lib/Filter/Simple.pm | 6 ++---- + t/no.t | 13 +++++++++++++ + 2 files changed, 15 insertions(+), 4 deletions(-) + create mode 100644 t/no.t + +diff --git a/lib/Filter/Simple.pm b/lib/Filter/Simple.pm +index 082fe95..1dcf3c8 100644 +--- a/lib/Filter/Simple.pm ++++ b/lib/Filter/Simple.pm +@@ -2,14 +2,12 @@ package Filter::Simple; + + use Text::Balanced ':ALL'; + +-use vars qw{ $VERSION @EXPORT }; +- +-$VERSION = '0.94'; ++our $VERSION = '0.95'; + + use Filter::Util::Call; + use Carp; + +-@EXPORT = qw( FILTER FILTER_ONLY ); ++our @EXPORT = qw( FILTER FILTER_ONLY ); + + + sub import { +diff --git a/t/no.t b/t/no.t +new file mode 100644 +index 0000000..8980eae +--- /dev/null ++++ b/t/no.t +@@ -0,0 +1,13 @@ ++BEGIN { ++ unshift @INC, 't/lib/'; ++} ++ ++print "1..2\n"; ++ ++use Filter::Simple::FilterTest qr/ok/ => "not ok", pass => "fail"; ++no Filter::Simple::FilterTest; ++ ++sub pass { print "ok ", $_[0], "\n" } ++ ++print "ok 1\n"; ++("pa"."ss")->(2); +-- +2.14.3 + diff --git a/Filter-Simple-0.94-Upgrade-to-0.96.patch b/Filter-Simple-0.94-Upgrade-to-0.96.patch new file mode 100644 index 0000000..0c5f8b8 --- /dev/null +++ b/Filter-Simple-0.94-Upgrade-to-0.96.patch @@ -0,0 +1,87 @@ +From 4ba21b30b81c9f775932674d4c29f1b81e15bfa2 Mon Sep 17 00:00:00 2001 +From: Jitka Plesnikova +Date: Tue, 21 Apr 2020 09:01:47 +0200 +Subject: [PATCH] Upgrade to 0.96 + +--- + lib/Filter/Simple.pm | 3 ++- + t/filter_only.t | 19 ++++++++++++++++++- + t/lib/Filter/Simple/ExeNoComments.pm | 11 +++++++++++ + 3 files changed, 31 insertions(+), 2 deletions(-) + create mode 100644 t/lib/Filter/Simple/ExeNoComments.pm + +diff --git a/lib/Filter/Simple.pm b/lib/Filter/Simple.pm +index 1dcf3c8..924c2ae 100644 +--- a/lib/Filter/Simple.pm ++++ b/lib/Filter/Simple.pm +@@ -2,7 +2,7 @@ package Filter::Simple; + + use Text::Balanced ':ALL'; + +-our $VERSION = '0.95'; ++our $VERSION = '0.96'; + + use Filter::Util::Call; + use Carp; +@@ -70,6 +70,7 @@ my %extractor_for = ( + my %selector_for = ( + all => sub { my ($t)=@_; sub{ $_=$$_; $t->(@_); $_} }, + executable=> sub { my ($t)=@_; sub{ref() ? $_=$$_ : $t->(@_); $_} }, ++ executable_no_comments=> sub { my ($t)=@_; sub{ref() ? $_=$$_ : $t->(@_); $_} }, + quotelike => sub { my ($t)=@_; sub{ref() && do{$_=$$_; $t->(@_)}; $_} }, + regex => sub { my ($t)=@_; + sub{ref() or return $_; +diff --git a/t/filter_only.t b/t/filter_only.t +index 57f1086..cd86707 100644 +--- a/t/filter_only.t ++++ b/t/filter_only.t +@@ -4,7 +4,7 @@ BEGIN { + + use Filter::Simple::FilterOnlyTest qr/not ok/ => "ok", + "bad" => "ok", fail => "die"; +-print "1..9\n"; ++print "1..11\n"; + + sub fail { print "ok ", $_[0], "\n" } + sub ok { print "ok ", $_[0], "\n" } +@@ -41,3 +41,20 @@ print "ok 8\n"; + + print "not " unless "bad" =~ /bad/; + print "ok 9\n"; ++ ++use Filter::Simple::ExeNoComments; ++ ++=for us ++ ++shromplex ++ ++=cut ++ ++# shromplex ++ ++# test the difference from code* ++my $x = "ABC"; ++ ++print $x eq "TEST" ? "" : "not ", "ok 10 # check strings processed\n"; ++ ++print "ok 11 # executable_no_comments\n"; +diff --git a/t/lib/Filter/Simple/ExeNoComments.pm b/t/lib/Filter/Simple/ExeNoComments.pm +new file mode 100644 +index 0000000..3eaa454 +--- /dev/null ++++ b/t/lib/Filter/Simple/ExeNoComments.pm +@@ -0,0 +1,11 @@ ++package Filter::Simple::ExeNoComments; ++ ++use Filter::Simple; ++ ++FILTER_ONLY ++ executable_no_comments => sub { ++ $_ =~ /shromplex/ and die "We wants no shromplexes!"; ++ s/ABC/TEST/g; ++ }; ++ ++1; +-- +2.21.1 + diff --git a/perl-Filter-Simple.spec b/perl-Filter-Simple.spec new file mode 100644 index 0000000..aecbede --- /dev/null +++ b/perl-Filter-Simple.spec @@ -0,0 +1,87 @@ +%global base_version 0.91 +Name: perl-Filter-Simple +Version: 0.92 +Release: 367%{?dist} +Summary: Simplified Perl source filtering +License: GPL+ or Artistic +Group: Development/Libraries +URL: http://search.cpan.org/dist/Filter-Simple/ +Source0: http://www.cpan.org/authors/id/S/SM/SMUELLER/Filter-Simple-%{base_version}.tar.gz +# Unbundled from perl 5.21.11 +Patch0: Filter-Simple-0.91-Upgrade-to-0.92.patch +BuildArch: noarch +BuildRequires: perl +BuildRequires: perl-generators +BuildRequires: perl(ExtUtils::MakeMaker) +BuildRequires: perl(strict) +# Run-time: +BuildRequires: perl(Carp) +BuildRequires: perl(Filter::Util::Call) +BuildRequires: perl(Text::Balanced) >= 1.97 +BuildRequires: perl(vars) +BuildRequires: perl(warnings) +# Tests: +BuildRequires: perl(Exporter) +BuildRequires: perl(parent) +Requires: perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version)) +Requires: perl(Text::Balanced) >= 1.97 +Requires: perl(warnings) + +# Filter under-specified dependencies +%global __requires_exclude %{?__requires_exclude:%__requires_exclude|}^perl\\(Text::Balanced\\)$ + +%description +The Filter::Simple Perl module provides a simplified interface to +Filter::Util::Call; one that is sufficient for most common cases. + +%prep +%setup -q -n Filter-Simple-%{base_version} +%patch0 -p1 + +%build +perl Makefile.PL INSTALLDIRS=vendor +make %{?_smp_mflags} + +%install +make pure_install DESTDIR=$RPM_BUILD_ROOT +find $RPM_BUILD_ROOT -type f -name .packlist -exec rm -f {} \; +%{_fixperms} $RPM_BUILD_ROOT/* + +%check +make test + +%files +%doc Changes README +%{perl_vendorlib}/* +%{_mandir}/man3/* + +%changelog +* Fri Mar 29 2019 Jitka Plesnikova - 0.92-367 +- Rebuild with enable hardening (bug #1636329) + +* Sat Feb 11 2017 Fedora Release Engineering - 0.92-366 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_26_Mass_Rebuild + +* Sat May 14 2016 Jitka Plesnikova - 0.92-365 +- Increase release to favour standalone package + +* Thu Feb 04 2016 Fedora Release Engineering - 0.92-347 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_24_Mass_Rebuild + +* Thu Jun 18 2015 Fedora Release Engineering - 0.92-346 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_23_Mass_Rebuild + +* Thu Jun 04 2015 Jitka Plesnikova - 0.92-345 +- Increase release to favour standalone package + +* Wed Jun 03 2015 Jitka Plesnikova - 0.92-2 +- Perl 5.22 rebuild + +* Wed May 06 2015 Petr Pisar - 0.92-1 +- 0.92 bump in order to dual-live with perl 5.22 + +* Tue Nov 18 2014 Petr Pisar - 0.91-340 +- Increase release number to supersede perl's sub-package + +* Wed Oct 29 2014 Petr Pisar 0.91-240 +- Specfile autogenerated by cpanspec 1.78. diff --git a/sources b/sources new file mode 100644 index 0000000..cccff47 --- /dev/null +++ b/sources @@ -0,0 +1 @@ +SHA1 (Filter-Simple-0.91.tar.gz) = a89562327c3b0cc054573c7bf71825102032a3dc