/[suikacvs]/test/html-webhacc/WebHACC/Language/DOM.pm
Suika

Diff of /test/html-webhacc/WebHACC/Language/DOM.pm

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

revision 1.6 by wakaba, Mon Jul 21 12:56:34 2008 UTC revision 1.9 by wakaba, Fri Aug 15 14:11:13 2008 UTC
# Line 181  sub generate_structure_error_section ($) Line 181  sub generate_structure_error_section ($)
181    my $out = $self->output;    my $out = $self->output;
182    $out->start_section (role => 'structure-errors');    $out->start_section (role => 'structure-errors');
183    $out->start_error_list (role => 'structure-errors');    $out->start_error_list (role => 'structure-errors');
184      $self->result->layer_applicable ('structure');
185    
186    my $input = $self->input;    my $input = $self->input;
187    my $result = $self->result;    my $result = $self->result;
188    
189    require Whatpm::ContentChecker;    require Whatpm::ContentChecker;
190    my $onerror = sub {    my $onerror = sub {
191      $result->add_error (@_, layer => 'structure');      $result->add_error (layer => 'structure', @_);
192    };    };
193    
194    my $onsubdoc = $self->onsubdoc;    my $onsubdoc = $self->onsubdoc;
# Line 201  sub generate_structure_error_section ($) Line 202  sub generate_structure_error_section ($)
202    
203    $out->end_error_list (role => 'structure-errors');    $out->end_error_list (role => 'structure-errors');
204    $out->end_section;    $out->end_section;
205    
206      $self->result->layer_uncertain ('semantics');
207  } # generate_structure_error_section  } # generate_structure_error_section
208    
209  sub generate_additional_sections ($) {  sub generate_additional_sections ($) {
# Line 373  sub generate_rdf_section ($) { Line 376  sub generate_rdf_section ($) {
376        $out->start_tag ('dt');        $out->start_tag ('dt');
377        $out->node_link ($triple->[0]);        $out->node_link ($triple->[0]);
378        $out->start_tag ('dd');        $out->start_tag ('dd');
379        $out->text ('Subject: ');        $out->nl_text ('Subject');
380          $out->text (': ');
381        $generate_rdf_resource_html->($triple->[1] => $out);        $generate_rdf_resource_html->($triple->[1] => $out);
382        $out->start_tag ('dd');        $out->start_tag ('dd');
383        $out->text ('Predicate: ');        $out->nl_text ('Predicate');
384          $out->text (': ');
385        $generate_rdf_resource_html->($triple->[2] => $out);        $generate_rdf_resource_html->($triple->[2] => $out);
386        $out->start_tag ('dd');        $out->start_tag ('dd');
387        $out->text ('Object: ');        $out->nl_text ('Object');
388          $out->text (': ');
389        $generate_rdf_resource_html->($triple->[3] => $out);        $generate_rdf_resource_html->($triple->[3] => $out);
390      }      }
391      $out->end_tag ('dl');      $out->end_tag ('dl');
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.9
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24