/[suikacvs]/markup/html/whatpm/Whatpm/Charset/DecodeHandle.pm
Suika

Diff of /markup/html/whatpm/Whatpm/Charset/DecodeHandle.pm

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

revision 1.5 by wakaba, Sun May 18 04:15:52 2008 UTC revision 1.6 by wakaba, Sun May 18 06:07:22 2008 UTC
# Line 603  sub getc ($) { Line 603  sub getc ($) {
603    
604    if ($error) {    if ($error) {
605      $r = substr $self->{byte_buffer}, 0, 1, '';      $r = substr $self->{byte_buffer}, 0, 1, '';
606      $self->{onerror}->($self, 'illegal-octets-error', octets => \$r);      my $fallback = $self->{fallback}->{$r};
607        if (defined $fallback) {
608          ## NOTE: This is an HTML5 parse error.  Applied to Web ISO-8859-1
609          ## and Web ISO-8859-11 encodings.
610          $self->{onerror}->($self, 'fallback-char-error', octets => \$r,
611                             char => \$fallback,
612                             level => $self->{must_level});
613          return $fallback;
614        } else {
615          $self->{onerror}->($self, 'illegal-octets-error', octets => \$r);
616        }
617    }    }
618    
619    return $r;    return $r;

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

[email protected]
ViewVC Help
Powered by ViewVC 1.1.24