perl/perl-HTML-FillInForm
SHA256
8
0
Fork 0
forked from pool/perl-HTML-FillInForm
Code Pull Requests Activity

Accepting request 924058 from home:pmonrealgonzalez:branches:devel:languages:perl

Browse Source 
- Remove patch rt-100926.patch merged upstream

OBS-URL: https://build.opensuse.org/request/show/924058
OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl-HTML-FillInForm?expand=0&rev=21
This commit is contained in:
Pedro Monreal Gonzalez
2021-10-07 17:12:36 +00:00
committed by Git OBS Bridge
parent 793a680fa6
commit f002bd3b0e
3 changed files with 6 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
perl-HTML-FillInForm.changes
View File

@@ -1,3 +1,8 @@
-------------------------------------------------------------------
Thu Oct 7 17:04:52 UTC 2021 - Pedro Monreal <pmonreal@suse.com>
- Remove patch rt-100926.patch merged upstream
-------------------------------------------------------------------
Sun Sep 26 03:07:06 UTC 2021 - Tina Müller <timueller+perl@suse.de>

2
perl-HTML-FillInForm.spec
View File

@@ -22,7 +22,7 @@ Version: 2.22
Release: 0
#Upstream: Artistic-1.0 or GPL-1.0-or-later
Summary: Populates HTML Forms with data
License: GPL-1.0-or-later OR Artistic-1.0
License: Artistic-1.0 OR GPL-1.0-or-later
URL: https://metacpan.org/release/%{cpan_name}
Source0: https://cpan.metacpan.org/authors/id/O/OA/OALDERS/%{cpan_name}-%{version}.tar.gz
Source1: cpanspec.yml

17
rt-100926.patch
View File

@@ -1,17 +0,0 @@
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;