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

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

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

revision 1.1 by wakaba, Sun Jul 20 14:58:24 2008 UTC revision 1.2 by wakaba, Sun Jul 20 16:53:10 2008 UTC
# Line 21  sub generate_syntax_error_section ($) { Line 21  sub generate_syntax_error_section ($) {
21    
22    my $onerror = sub {    my $onerror = sub {
23      my $err = shift;      my $err = shift;
24      my $line = $err->location->line_number;      $result->add_error (line => $err->location->line_number,
25      $out->start_tag ('dt');                          column => $err->location->column_number,
26      $out->xref (qq[Line $line], target => 'line-' . $line);                          type => 'xml parse error',
27      $out->html (' column ' . $err->location->column_number . '<dd>');                          value => $err->text,
28      $out->text ($err->text);                          level => [
   
     add_error ('syntax', {type => $err->text,  
                 level => [  
29                            $err->SEVERITY_FATAL_ERROR => 'm',                            $err->SEVERITY_FATAL_ERROR => 'm',
30                            $err->SEVERITY_ERROR => 'm',                            $err->SEVERITY_ERROR => 'm',
31                            $err->SEVERITY_WARNING => 's',                            $err->SEVERITY_WARNING => 's',
32                           ]->[$err->severity]} => $result);                          ]->[$err->severity],
33                            layer => 'syntax');
34      return 1;      return 1;
35    };    };
36    
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24