>From a7aa5ed6987d312eef98682183a7c463f1727bea Mon Sep 17 00:00:00 2001 From: Jitka Plesnikova <jplesnik@xxxxxxxxxx> Date: Tue, 5 May 2015 10:31:59 +0200 Subject: Fix invalid regex (CPAN RT#104221) diff --git a/HTML-StripScripts-1.05-Fix-typo-in-regex.patch b/HTML-StripScripts-1.05-Fix-typo-in-regex.patch new file mode 100644 index 0000000..a2c4463 --- /dev/null +++ b/HTML-StripScripts-1.05-Fix-typo-in-regex.patch @@ -0,0 +1,12 @@ +diff -up HTML-StripScripts-1.05/StripScripts.pm.orig HTML-StripScripts-1.05/StripScripts.pm +--- HTML-StripScripts-1.05/StripScripts.pm.orig 2015-05-05 09:12:33.495920443 +0200 ++++ HTML-StripScripts-1.05/StripScripts.pm 2015-05-05 09:53:33.099908066 +0200 +@@ -1630,7 +1630,7 @@ size or length. + + sub _hss_attval_size { + $_[3] +- =~ /^\s*([+-]?\d{1,20}(?:\.\d{1,20)?)\s*((?:\%|\*|ex|px|pc|cm|mm|in|pt|em)?)\s*$/i ++ =~ /^\s*([+-]?\d{1,20}(?:\.\d{1,20})?)\s*((?:\%|\*|ex|px|pc|cm|mm|in|pt|em)?)\s*$/i + ? lc "$1$2" + : undef; + } diff --git a/perl-HTML-StripScripts.spec b/perl-HTML-StripScripts.spec index 0002b4a..5fb06f2 100644 --- a/perl-HTML-StripScripts.spec +++ b/perl-HTML-StripScripts.spec @@ -1,16 +1,23 @@ Name: perl-HTML-StripScripts Version: 1.05 -Release: 12%{?dist} +Release: 13%{?dist} Summary: Strip scripting constructs out of HTML License: GPL+ or Artistic Group: Development/Libraries URL: http://search.cpan.org/dist/HTML-StripScripts/ Source0: http://search.cpan.org/CPAN/authors/id/D/DR/DRTECH/HTML-StripScripts-%{version}.tar.gz +# Add missing a right brace to regex (CPAN RT#104221) +Patch0: HTML-StripScripts-1.05-Fix-typo-in-regex.patch BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n) BuildArch: noarch +BuildRequires: perl(base) BuildRequires: perl(ExtUtils::MakeMaker) +BuildRequires: perl(strict) +BuildRequires: perl(Test::More) BuildRequires: perl(Test::Pod) BuildRequires: perl(Test::Pod::Coverage) +BuildRequires: perl(vars) +BuildRequires: perl(warnings) Requires: perl(:MODULE_COMPAT_%(eval "`%{__perl} -V:version`"; echo $version)) @@ -22,6 +29,7 @@ display HTML originating from an untrusted source without introducing XSS %prep %setup -q -n HTML-StripScripts-%{version} +%patch0 -p1 %build %{__perl} Makefile.PL INSTALLDIRS=vendor @@ -30,7 +38,7 @@ make %{?_smp_mflags} %install rm -rf $RPM_BUILD_ROOT -make pure_install PERL_INSTALL_ROOT=$RPM_BUILD_ROOT +make pure_install DESTDIR=$RPM_BUILD_ROOT find $RPM_BUILD_ROOT -type f -name .packlist -exec rm -f {} \; find $RPM_BUILD_ROOT -depth -type d -exec rmdir {} 2>/dev/null \; @@ -50,6 +58,9 @@ rm -rf $RPM_BUILD_ROOT %{_mandir}/man3/* %changelog +* Tue May 05 2015 Jitka Plesnikova <jplesnik@xxxxxxxxxx> - 1.05-13 +- Fix invalid regex (CPAN RT#104221) + * Wed Aug 27 2014 Jitka Plesnikova <jplesnik@xxxxxxxxxx> - 1.05-12 - Perl 5.20 rebuild -- cgit v0.10.2 http://pkgs.fedoraproject.org/cgit/perl-HTML-StripScripts.git/commit/?h=master&id=a7aa5ed6987d312eef98682183a7c463f1727bea -- Fedora Extras Perl SIG http://www.fedoraproject.org/wiki/Extras/SIGs/Perl perl-devel mailing list perl-devel@xxxxxxxxxxxxxxxxxxxxxxx https://admin.fedoraproject.org/mailman/listinfo/perl-devel