gentoo/dev-perl/HTML-TableParser/files/HTML-TableParser-0.430.0-tests.patch
Andreas K. Hüttel d47cd2868d
dev-perl/HTML-TableParser: Fix tests
Bug: https://rt.cpan.org/Public/Bug/Display.html?id=121341
Closes: https://bugs.gentoo.org/737338
Package-Manager: Portage-3.0.28, Repoman-3.0.3
Signed-off-by: Andreas K. Hüttel <dilfridge@gentoo.org>
2021-12-18 17:17:43 +01:00

16 lines
665 B
Diff

https://bugs.gentoo.org/737338
https://rt.cpan.org/Public/Bug/Display.html?id=121341
diff -ruN HTML-TableParser-0.43.orig/t/req_order.t HTML-TableParser-0.43/t/req_order.t
--- HTML-TableParser-0.43.orig/t/req_order.t 2018-03-22 21:31:52.000000000 +0100
+++ HTML-TableParser-0.43/t/req_order.t 2021-12-18 17:14:37.239637221 +0100
@@ -48,5 +48,5 @@
my $p = HTML::TableParser->new( \@reqs );
$p->parse_file( 'data/ned.html' ) || die;
-ok( eq_array( $header, $columns ), "$html header" );
-ok( eq_array( $data->{Default}, \@parse_data ), "$html data" );
+is_deeply( $header, $columns, "$html header" );
+is_deeply( $data->{Default}, \@parse_data, "$html data" );