/[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.102 by wakaba, Mon Oct 27 05:44:47 2008 UTC revision 1.103 by wakaba, Sat Dec 6 10:00:53 2008 UTC
# Line 327  our $IsInHTMLInteractiveContent = sub { Line 327  our $IsInHTMLInteractiveContent = sub {
327    ## or permanently) interactive content.    ## or permanently) interactive content.
328    
329    if ($nsuri eq $HTML_NS and ($ln eq 'video' or $ln eq 'audio')) {    if ($nsuri eq $HTML_NS and ($ln eq 'video' or $ln eq 'audio')) {
330      return $el->has_attribute ('controls');      return $el->has_attribute_ns (undef, 'controls');
331    } elsif ($nsuri eq $HTML_NS and $ln eq 'menu') {    } elsif ($nsuri eq $HTML_NS and $ln eq 'menu') {
332      my $value = $el->get_attribute ('type');      my $value = $el->get_attribute_ns (undef, 'type');
333      $value =~ tr/A-Z/a-z/; # ASCII case-insensitive      $value =~ tr/A-Z/a-z/; # ASCII case-insensitive
334      return ($value eq 'toolbar');      return ($value eq 'toolbar');
335    } else {    } else {
Legend:
Removed from v.1.102  
changed lines
  Added in v.1.103
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24