Hello community, here is the log from the commit of package perl-HTML-FillInForm for openSUSE:Factory checked in at 2015-08-29 20:04:46 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-HTML-FillInForm (Old) and /work/SRC/openSUSE:Factory/.perl-HTML-FillInForm.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "perl-HTML-FillInForm" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-HTML-FillInForm/perl-HTML-FillInForm.changes 2015-04-16 14:13:56.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-HTML-FillInForm.new/perl-HTML-FillInForm.changes 2015-08-29 20:04:47.000000000 +0200 @@ -1,0 +2,8 @@ +Thu Aug 27 13:19:06 UTC 2015 - hsk@imb-jena.de + +- add CGI to Requires:, BuildRequires:, as that module is not in + perl core since perl 5.22 +- rt-100926.patch: patch from rt.cpan.org, #100926 / github, pr #9, + to avoid security warning + +------------------------------------------------------------------- New: ---- rt-100926.patch ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-HTML-FillInForm.spec ++++++ --- /var/tmp/diff_new_pack.qdaqVa/_old 2015-08-29 20:04:47.000000000 +0200 +++ /var/tmp/diff_new_pack.qdaqVa/_new 2015-08-29 20:04:47.000000000 +0200 @@ -27,12 +27,15 @@ Url: http://search.cpan.org/dist/HTML-FillInForm/ Source0: http://www.cpan.org/authors/id/M/MA/MARKSTOS/%{cpan_name}-%{version}.tar.gz Source1: cpanspec.yml +Patch0: rt-100926.patch BuildArch: noarch BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl BuildRequires: perl-macros +BuildRequires: perl(CGI) BuildRequires: perl(HTML::Parser) >= 3.26 BuildRequires: perl(HTML::TokeParser) >= 3.26 +Requires: perl(CGI) Requires: perl(HTML::Parser) >= 3.26 Requires: perl(HTML::TokeParser) >= 3.26 %{perl_requires} ++++++ rt-100926.patch ++++++ diff -ur a/HTML-FillInForm-2.21/lib/HTML/FillInForm.pm b/HTML-FillInForm-2.21/lib/HTML/FillInForm.pm --- a/HTML-FillInForm-2.21/lib/HTML/FillInForm.pm 2014-08-14 17:21:43.000000000 +0200 +++ b/HTML-FillInForm-2.21/lib/HTML/FillInForm.pm 2015-08-27 15:10:07.462905794 +0200 @@ -424,7 +424,12 @@ # traverse the list in reverse order for backwards compatibility # with the previous implementation. for my $o (reverse @{$self->{objects}}) { - my @v = $o->param($param); + my @v; + if ($o->can('multi_param')) { + @v = $o->multi_param($param); + } else { + @v = $o->param($param); + } next unless @v;