diff options
-rwxr-xr-x | httpd/cgi-bin/check | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/httpd/cgi-bin/check b/httpd/cgi-bin/check index 25ab20e..f19f6c6 100755 --- a/httpd/cgi-bin/check +++ b/httpd/cgi-bin/check @@ -2489,15 +2489,19 @@ sub report_errors ($) if (!exists $Errors_bytype{$err->{num}}) { $Errors_bytype{$err->{num}}->{instances} = []; my $msg_text; - if ($err->{num} ne 'xmlwf') { + if ($err->{num} eq 'xmlwf') { + + # FIXME need a catalog of errors from XML::LibXML + $msg_text = "XML Parsing Error"; + } + elsif ($err->{num} eq 'html5') { + $msg_text = "HTML5 Validator Error"; + } + else { $msg_text = $RSRC{msg}->{$err->{num}}->{original}; $msg_text =~ s/%1/X/; $msg_text =~ s/%2/Y/; } - else - { ## FIXME we need a catalog of errors from our XML parser - $msg_text = "XML Parsing Error"; - } $Errors_bytype{$err->{num}}->{expl} = $err->{expl}; $Errors_bytype{$err->{num}}->{generic_msg} = $msg_text; $Errors_bytype{$err->{num}}->{msg} = $err->{msg}; |