--- test/html-webhacc/WebHACC/Result.pm 2008/08/15 05:53:23 1.10 +++ test/html-webhacc/WebHACC/Result.pm 2008/08/22 13:08:12 1.15 @@ -81,8 +81,6 @@ $error_layer = 'syntax'; ## NOTE: Unknown - an error of the implementation } - my $error_type_text = $opt{type}; - my $class = qq[level-$error_level layer-$error_layer]; ## Line & column numbers (prepare values) @@ -187,8 +185,8 @@ } elsif (defined $opt{input}->{request_uri}) { $out->url ($opt{input}->{request_uri}); $has_location = 1; - } elsif (defined $opt{input}->{uri}) { - $out->url ($opt{input}->{uri}); + } elsif (defined $opt{input}->url) { + $out->url ($opt{input}->url); $has_location = 1; } } @@ -205,14 +203,9 @@ $out->text (': '); ## Error message - $out->nl_text ($error_type_text, node => $opt{node}, text => $opt{text}); - - ## Additional error description - if (defined $opt{text}) { - $out->html (' ('); - $out->text ($opt{text}); - $out->html (')'); - } + my $error_type_text = $opt{type}; + $out->nl_text ($error_type_text, node => $opt{node}, text => $opt{text}, + value => $opt{value}); ## Link to a long description @@ -220,8 +213,10 @@ $fragment =~ tr/ /-/; $fragment = $out->encode_url_component ($fragment); $out->text (' ['); - $out->link ('Description', url => '../error-description#' . $fragment, - rel => 'help'); + $out->start_tag ('a', href => '../error-description#' . $fragment, + rel => 'help'); + $out->nl_text ('Description'); + $out->end_tag ('a'); $out->text (']'); if ($error_level eq 'm') { @@ -292,7 +287,7 @@ target => 'transfer-errors', score_base => 20, parent_status => $maindoc_status}, {label => 'Encode L.', status => $self->{layers}->{encode}, - score_base => 10, + target => 'parse-errors', score_base => 10, parent_status => $maindoc_status}, {label => 'Char L.', status => $self->{layers}->{charset}, score_base => 10,