--- test/html-webhacc/cc.cgi 2007/11/23 12:08:32 1.29
+++ test/html-webhacc/cc.cgi 2008/02/09 12:22:19 1.30
@@ -166,7 +166,7 @@
$result->{conforming_min} = 0;
} elsif ($err->{level} eq 'w' or $err->{level} eq 'g') {
$result->{$layer}->{warning}++;
- } elsif ($err->{level} eq 'unsupported') {
+ } elsif ($err->{level} eq 'u' or $err->{level} eq 'unsupported') {
$result->{$layer}->{unsupported}++;
$result->{unsupported} = 1;
} else {
@@ -806,9 +806,9 @@
];
push @nav, ['#parse-errors' => 'Errors'];
- add_error (char => {level => 'unsupported'} => $result);
- add_error (syntax => {level => 'unsupported'} => $result);
- add_error (structure => {level => 'unsupported'} => $result);
+ add_error (char => {level => 'u'} => $result);
+ add_error (syntax => {level => 'u'} => $result);
+ add_error (structure => {level => 'u'} => $result);
} # print_result_unknown_type_section
sub print_result_input_error_section ($) {
@@ -865,7 +865,7 @@
} elsif ($err->{level} eq 'w') {
$r = qq[Warning:
];
- } elsif ($err->{level} eq 'unsupported') {
+ } elsif ($err->{level} eq 'u' or $err->{level} eq 'unsupported') {
$r = qq[Not
supported: ];
} else {
@@ -1151,4 +1151,4 @@
=cut
-## $Date: 2007/11/23 12:08:32 $
+## $Date: 2008/02/09 12:22:19 $