| 1 |
commit: 7f21cf37ab2dd7b6348a2871979ae6768ea95cb6 |
| 2 |
Author: Michael Mair-Keimberger <mmk <AT> levelnine <DOT> at> |
| 3 |
AuthorDate: Fri Nov 5 15:25:55 2021 +0000 |
| 4 |
Commit: Jakov Smolić <jsmolic <AT> gentoo <DOT> org> |
| 5 |
CommitDate: Sat Nov 6 09:30:16 2021 +0000 |
| 6 |
URL: https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=7f21cf37 |
| 7 |
|
| 8 |
dev-perl/HTML-TableContentParser: remove unused patch(es) |
| 9 |
|
| 10 |
Package-Manager: Portage-3.0.28, Repoman-3.0.3 |
| 11 |
Signed-off-by: Michael Mair-Keimberger <mmk <AT> levelnine.at> |
| 12 |
Signed-off-by: Jakov Smolić <jsmolic <AT> gentoo.org> |
| 13 |
|
| 14 |
.../HTML-TableContentParser/files/0.13-test.patch | 74 ---------------------- |
| 15 |
1 file changed, 74 deletions(-) |
| 16 |
|
| 17 |
diff --git a/dev-perl/HTML-TableContentParser/files/0.13-test.patch b/dev-perl/HTML-TableContentParser/files/0.13-test.patch |
| 18 |
deleted file mode 100644 |
| 19 |
index 79916acc1e1..00000000000 |
| 20 |
--- a/dev-perl/HTML-TableContentParser/files/0.13-test.patch |
| 21 |
+++ /dev/null |
| 22 |
@@ -1,74 +0,0 @@ |
| 23 |
---- t/1.t |
| 24 |
-+++ t/1.t |
| 25 |
-@@ -2,6 +2,8 @@ |
| 26 |
- |
| 27 |
- |
| 28 |
- use Test; |
| 29 |
-+use strict; |
| 30 |
-+use warnings; |
| 31 |
- |
| 32 |
- BEGIN { plan tests => 34 } |
| 33 |
- |
| 34 |
-@@ -20,7 +22,7 @@ |
| 35 |
- |
| 36 |
- ## Test object creation |
| 37 |
- |
| 38 |
--$obj = HTML::TableContentParser->new(); |
| 39 |
-+my $obj = HTML::TableContentParser->new(); |
| 40 |
- ok(defined $obj, 1, $@); |
| 41 |
- |
| 42 |
- |
| 43 |
-@@ -29,14 +31,14 @@ |
| 44 |
- ## the correct values to the callback. |
| 45 |
- |
| 46 |
- |
| 47 |
--$table_caption = 'This is a caption'; |
| 48 |
--$table_content1 = 'This is table cell content 1'; |
| 49 |
--$table_content2 = 'This is table cell content 2'; |
| 50 |
--$table_content3 = '<a href="SomeLink">This is table cell content 3, a link</a>'; |
| 51 |
--$table_content4 = 'Some more text wrapping <a href="SomeLink">This is table cell content 4</a> a link.'; |
| 52 |
--$header_text = 'Header text'; |
| 53 |
-+my $table_caption = 'This is a caption'; |
| 54 |
-+my $table_content1 = 'This is table cell content 1'; |
| 55 |
-+my $table_content2 = 'This is table cell content 2'; |
| 56 |
-+my $table_content3 = '<a href="SomeLink">This is table cell content 3, a link</a>'; |
| 57 |
-+my $table_content4 = 'Some more text wrapping <a href="SomeLink">This is table cell content 4</a> a link.'; |
| 58 |
-+my $header_text = 'Header text'; |
| 59 |
- |
| 60 |
--$html = qq{ |
| 61 |
-+my $html = qq{ |
| 62 |
- <html> |
| 63 |
- <head> |
| 64 |
- </head> |
| 65 |
-@@ -59,7 +61,7 @@ |
| 66 |
- |
| 67 |
- |
| 68 |
- $HTML::TableContentParser::DEBUG = 0; |
| 69 |
--$tables = $obj->parse($html); |
| 70 |
-+my $tables = $obj->parse($html); |
| 71 |
- ok($tables->[0]->{caption}->{data}, $table_caption, $@); |
| 72 |
- ok($tables->[0]->{rows}->[0]->{cells}->[0]->{data}, $table_content1, $@); |
| 73 |
- ok($tables->[0]->{rows}->[1]->{cells}->[0]->{data}, $table_content2, $@); |
| 74 |
-@@ -124,16 +126,17 @@ |
| 75 |
- ok(@$tables, 2, @_); |
| 76 |
- |
| 77 |
- ## and three headers for each table |
| 78 |
--for $t (0..$#{@$tables}) { |
| 79 |
-- for (0..$#hdrs) { |
| 80 |
-- ok($tables->[$t]->{headers}->[$_]->{data}, $hdrs[$_], $@); |
| 81 |
-+for my $t (0..(@$tables-1)) { |
| 82 |
-+ for (0..2) { |
| 83 |
-+ # ok($t, $t); |
| 84 |
-+ ok($tables->[$t]->{headers}->[$_]->{data}, $hdrs[$_], $@); |
| 85 |
- } |
| 86 |
- } |
| 87 |
- |
| 88 |
- |
| 89 |
- ## and three rows of three cells each, for each table.. (18 total). |
| 90 |
--for $t (0..$#{@$tables}) { |
| 91 |
-- for $r (0..$#rows) { |
| 92 |
-+for my $t (0..1) { |
| 93 |
-+ for my $r (0..$#rows) { |
| 94 |
- for (0..2) { |
| 95 |
- ok($tables->[$t]->{rows}->[$r]->{cells}->[$_]->{data}, $rows[$r]->[$_], $@); |
| 96 |
- } |
Archives