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

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

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

revision 1.3 by wakaba, Mon Jul 21 08:39:12 2008 UTC revision 1.4 by wakaba, Mon Jul 21 13:09:19 2008 UTC
# Line 13  sub generate_syntax_error_section ($) { Line 13  sub generate_syntax_error_section ($) {
13    
14    my $out = $self->output;    my $out = $self->output;
15    
16    $out->start_section (id => 'parse-errors', title => 'Errors');    $out->start_section (role => 'parse-errors');
17    $out->start_tag ('dl');    $out->start_error_list (role => 'parse-errors');
18    
19    $self->result->add_error (input => $self->input,    $self->result->add_error (input => $self->input,
20                              level => 'u',                              level => 'u',
21                              layer => 'syntax',                              layer => 'syntax',
22                              type => 'media type not supported',                              type => 'media type not supported:syntax',
23                              text => $self->input->{media_type});                              text => $self->input->{media_type});
24    
25    $out->end_tag ('dl');    $out->end_error_list (role => 'parse-errors');
26    $out->end_section;    $out->end_section;
27  } # generate_syntax_error_section  } # generate_syntax_error_section
28    

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24