--- test/html-whatpm/table.cgi	2008/05/06 07:50:28	1.6
+++ test/html-whatpm/table.cgi	2008/05/06 08:47:09	1.7
@@ -65,6 +65,8 @@
     my $table = Whatpm::HTMLTable->form_table ($table_el);
     Whatpm::HTMLTable->assign_header ($table);
 
+    delete $table->{element};
+
     for (@{$table->{column_group}}, @{$table->{column}}, $table->{caption},
          @{$table->{row}}) {
       next unless $_;
@@ -118,4 +120,4 @@
 
 =cut
 
-## $Date: 2008/05/06 07:50:28 $
+## $Date: 2008/05/06 08:47:09 $