/[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.101 by wakaba, Tue Oct 7 11:41:41 2008 UTC revision 1.102 by wakaba, Mon Oct 27 05:44:47 2008 UTC
# Line 503  sub check_document ($$$;$) { Line 503  sub check_document ($$$;$) {
503      if ($doc->manakai_is_html) {      if ($doc->manakai_is_html) {
504        if (not $doc->manakai_has_bom and        if (not $doc->manakai_has_bom and
505            not defined $doc->manakai_charset) {            not defined $doc->manakai_charset) {
506          unless ($charset->{is_html_ascii_superset}) {          unless ($charset->{category}
507                      & Message::Charset::Info::CHARSET_CATEGORY_ASCII_COMPAT ()) {
508            $onerror->(node => $doc,            $onerror->(node => $doc,
509                       level => $self->{level}->{must},                       level => $self->{level}->{must},
510                       type => 'non ascii superset',                       type => 'non ascii superset',
# Line 531  sub check_document ($$$;$) { Line 532  sub check_document ($$$;$) {
532                     level => $self->{level}->{should},                     level => $self->{level}->{should},
533                     layer => 'encode');                     layer => 'encode');
534        } elsif ($charset->{iana_names}->{'cesu-8'} or        } elsif ($charset->{iana_names}->{'cesu-8'} or
535                 $charset->{iana_names}->{'utf-8'} or ## ISSUE: UNICODE-1-1-UTF-7?                 $charset->{iana_names}->{'utf-7'} or ## ISSUE: UNICODE-1-1-UTF-7?
536                 $charset->{iana_names}->{'bocu-1'} or                 $charset->{iana_names}->{'bocu-1'} or
537                 $charset->{iana_names}->{'scsu'}) {                 $charset->{iana_names}->{'scsu'}) {
538          $onerror->(node => $doc,          $onerror->(node => $doc,
Legend:
Removed from v.1.101  
changed lines
  Added in v.1.102
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24