/[suikacvs]/test/html-webhacc/cc.cgi
Suika

Diff of /test/html-webhacc/cc.cgi

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.49 by wakaba, Tue May 6 07:50:28 2008 UTC revision 1.50 by wakaba, Tue May 6 08:47:09 2008 UTC
# Line 956  sub print_table_section ($$) { Line 956  sub print_table_section ($$) {
956    require JSON;    require JSON;
957        
958    my $i = 0;    my $i = 0;
959    for my $table_el (@$tables) {    for my $table (@$tables) {
960      $i++;      $i++;
961      print STDOUT qq[<div class="section" id="$input->{id_prefix}table-$i"><h3>] .      print STDOUT qq[<div class="section" id="$input->{id_prefix}table-$i"><h3>] .
962          get_node_link ($input, $table_el) . q[</h3>];          get_node_link ($input, $table->{element}) . q[</h3>];
963    
964        delete $table->{element};
965    
     ## TODO: Make |ContentChecker| return |form_table| result  
     ## so that this script don't have to run the algorithm twice.  
     my $table = Whatpm::HTMLTable->form_table ($table_el);  
       
966      for (@{$table->{column_group}}, @{$table->{column}}, $table->{caption},      for (@{$table->{column_group}}, @{$table->{column}}, $table->{caption},
967           @{$table->{row}}) {           @{$table->{row}}) {
968        next unless $_;        next unless $_;
Legend:
Removed from v.1.49  
changed lines
  Added in v.1.50
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24