/[suikacvs]/markup/html/whatpm/Whatpm/ContentChecker.pm
Suika

Diff of /markup/html/whatpm/Whatpm/ContentChecker.pm

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

revision 1.85 by wakaba, Fri Aug 15 16:02:02 2008 UTC revision 1.86 by wakaba, Sat Aug 16 07:35:23 2008 UTC
# Line 422  sub check_document ($$$;$) { Line 422  sub check_document ($$$;$) {
422        if (not $doc->manakai_has_bom and        if (not $doc->manakai_has_bom and
423            not defined $doc->manakai_charset) {            not defined $doc->manakai_charset) {
424          unless ($charset->{is_html_ascii_superset}) {          unless ($charset->{is_html_ascii_superset}) {
425            $onerror->(node => $doc, level => $self->{level}->{must},            $onerror->(node => $doc,
426                         level => $self->{level}->{must},
427                       type => 'non ascii superset',                       type => 'non ascii superset',
428                       text => $charset_name);                       text => $charset_name);
429          }          }
430                    
431          if (not $self->{has_charset} and ## TODO: This does not work now.          if (not $self->{has_charset} and ## TODO: This does not work now.
432              not $charset->{iana_names}->{'us-ascii'}) {              not $charset->{iana_names}->{'us-ascii'}) {
433            $onerror->(node => $doc, level => $self->{level}->{must},            $onerror->(node => $doc,
434                         level => $self->{level}->{must},
435                       type => 'no character encoding declaration',                       type => 'no character encoding declaration',
436                       text => $charset_name);                       text => $charset_name);
437          }          }
Legend:
Removed from v.1.85  
changed lines
  Added in v.1.86
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24