--- test/html-webhacc/WebHACC/Result.pm 2008/08/30 10:27:47 1.17 +++ test/html-webhacc/WebHACC/Result.pm 2008/09/14 06:33:27 1.20 @@ -117,6 +117,8 @@ $column = $opt{column}; } } + $line += $opt{line_diff} || 0 if defined $line; + $column += $opt{column_diff} || 0 if defined $column; $line = $line - 1 || 1 if defined $line and not (defined $column and $column > 0); @@ -235,7 +237,8 @@ ## Error message my $error_type_text = $opt{type}; $out->nl_text ($error_type_text, node => $opt{node}, text => $opt{text}, - value => $opt{value}); + value => $opt{value}, char => $opt{char}, + octets => $opt{octets}); ## Link to a long description @@ -320,8 +323,9 @@ target => 'parse-errors', score_base => 10, parent_status => $maindoc_status}, {label => 'Char L.', status => $self->{layers}->{charset}, - score_base => 10, + target => 'parse-errors', score_base => 10, parent_status => $maindoc_status}, + ## TODO: char semantics layer {label => 'Syntax L.', status => $self->{layers}->{syntax}, target => 'parse-errors', score_base => 20, parent_status => $maindoc_status},