commit f4899c6181d80e4a48e3784d632a90522ec15721
Author: Tom "spot" Callaway <tcallawa@xxxxxxxxxx>
Date: Tue Jun 28 15:56:34 2011 -0400
fix FTBFS, thanks to Petr Pisar
perl-Class-DBI-AsForm-fix01test.patch | 34 +++++++++++++++++++++++---------
perl-Class-DBI-AsForm.spec | 5 +++-
2 files changed, 28 insertions(+), 11 deletions(-)
---
diff --git a/perl-Class-DBI-AsForm-fix01test.patch b/perl-Class-DBI-AsForm-fix01test.patch
index 1ad196f..b0d8503 100644
--- a/perl-Class-DBI-AsForm-fix01test.patch
+++ b/perl-Class-DBI-AsForm-fix01test.patch
@@ -1,22 +1,36 @@
---- Class-DBI-AsForm-2.42/t/01.t.BAD 2006-09-14 20:54:39.000000000 -0500
-+++ Class-DBI-AsForm-2.42/t/01.t 2006-09-14 20:58:35.000000000 -0500
-@@ -40,15 +40,15 @@
+From ca3bb3bb3004396afa52ea9b3c99e9b5dd363576 Mon Sep 17 00:00:00 2001
+From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@xxxxxxxxxx>
+Date: Fri, 24 Jun 2011 12:12:50 +0200
+Subject: [PATCH] Adapt to formating changes in HTML-Tree 4.0 (RT#63623)
+
+---
+ t/01.t | 11 ++++-------
+ 1 files changed, 4 insertions(+), 7 deletions(-)
+
+diff --git a/t/01.t b/t/01.t
+index 96133ba..e26e83e 100644
+--- a/t/01.t
++++ b/t/01.t
+@@ -40,15 +40,12 @@ like(Foo->to_field("baz"), qr/<input .*name="baz"/,
"Ordinary text field OK");
Foo->has_a(bar => Bar);
-is(Foo->to_field("bar"), "<select name=\"bar\"><option value=1>Hi</option></select>\n",
-+is(Foo->to_field("bar"), "<select name=\"bar\"><option value=\"1\">Hi</option></select>\n",
++is(Foo->to_field("bar"), "<select name=\"bar\"><option value=\"1\">Hi</option></select>",
"Select OK");
my $x = bless({id => 1, bar => Bar->retrieve_all(), baz => "Hello there"}, "Foo");
-my %cgi = ( id => '<input name="id" type="text" value=1>
-+my %cgi = ( id => '<input name="id" type="text" value="1" />
- ',
+-',
- bar => '<select name="bar"><option selected value=1>Hi</option></select>
-+ bar => '<select name="bar"><option selected value="1">Hi</option></select>
- ',
+-',
- baz => '<input name="baz" type="text" value="Hello there">
-+ baz => '<input name="baz" type="text" value="Hello there" />
- '
+-'
++my %cgi = ( id => '<input name="id" type="text" value="1" />',
++ bar => '<select name="bar"><option selected value="1">Hi</option></select>',
++ baz => '<input name="baz" type="text" value="Hello there" />'
);
is_deeply({$x->to_cgi}, \%cgi, "All correct as an object method");
+--
+1.7.5.4
+
diff --git a/perl-Class-DBI-AsForm.spec b/perl-Class-DBI-AsForm.spec
index 664120f..1170024 100644
--- a/perl-Class-DBI-AsForm.spec
+++ b/perl-Class-DBI-AsForm.spec
@@ -1,6 +1,6 @@
Name: perl-Class-DBI-AsForm
Version: 2.42
-Release: 13%{?dist}
+Release: 14%{?dist}
Summary: Produce HTML form elements for database columns
Group: Development/Libraries
License: GPL+ or Artistic
@@ -50,6 +50,9 @@ rm -rf $RPM_BUILD_ROOT
%changelog
+* Fri Jun 24 2011 Petr Pisar <ppisar@xxxxxxxxxx> - 2.42-14
+- Adapt to formating changes in HTML-Tree 4.0 (RT#63623, rhbz#715795)
+
* Tue Feb 08 2011 Fedora Release Engineering <rel-eng@xxxxxxxxxxxxxxxxxxxxxxx> - 2.42-13
- Rebuilt for https://fedoraproject.org/wiki/Fedora_15_Mass_Rebuild
--
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
