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

- 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

perl-HTML-FillInForm.changes

@@ -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>
 

perl-HTML-FillInForm.spec

@@ -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

rt-100926.patch

@@ -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;
-