--- test/html-whatpm/table.cgi 2007/05/27 06:37:05 1.1
+++ test/html-whatpm/table.cgi 2007/05/27 10:00:48 1.2
@@ -51,10 +51,11 @@
HTML5 Table Structure Viewer
+
-
+
';
my $i = 0;
@@ -63,7 +64,7 @@
my $table = Whatpm::HTMLTable->form_table ($table_el);
- for (@{$table->{column_group}}, @{$table->{column}}) {
+ for (@{$table->{column_group}}, @{$table->{column}}, $table->{caption}) {
next unless $_;
delete $_->{element};
}
@@ -85,7 +86,7 @@
}
}
- print STDOUT '