/[suikacvs]/markup/html/whatpm/Whatpm/HTML/Serializer.pm
Suika

Diff of /markup/html/whatpm/Whatpm/HTML/Serializer.pm

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

revision 1.4 by wakaba, Sat May 24 10:58:19 2008 UTC revision 1.6 by wakaba, Sun Sep 6 01:21:44 2009 UTC
# Line 51  sub get_inner_html ($$$) { Line 51  sub get_inner_html ($$$) {
51          $attr_value =~ s/&/&/g;          $attr_value =~ s/&/&/g;
52          $attr_value =~ s/</&lt;/g;          $attr_value =~ s/</&lt;/g;
53          $attr_value =~ s/>/&gt;/g;          $attr_value =~ s/>/&gt;/g;
54          $attr_value =~ s/"/&quot;/g;          $attr_value =~ s/"/&quot;/g; # in attribute mode
55          $attr_value =~ s/\xA0/&nbsp;/g;          $attr_value =~ s/\xA0/&nbsp;/g;
56          $s .= $attr_value . '"';          $s .= $attr_value . '"';
57        }        }
# Line 61  sub get_inner_html ($$$) { Line 61  sub get_inner_html ($$$) {
61          area => 1, base => 1, basefont => 1, bgsound => 1,          area => 1, base => 1, basefont => 1, bgsound => 1,
62          br => 1, col => 1, embed => 1, frame => 1, hr => 1,          br => 1, col => 1, embed => 1, frame => 1, hr => 1,
63          img => 1, input => 1, link => 1, meta => 1, param => 1,          img => 1, input => 1, link => 1, meta => 1, param => 1,
64          spacer => 1, wbr => 1,          spacer => 1, wbr => 1, keygen => 1,
65        }->{$tag_name};        }->{$tag_name};
66    
67        $s .= "\x0A" if {pre => 1, textarea => 1, listing => 1}->{$tag_name};        $s .= "\x0A" if {pre => 1, textarea => 1, listing => 1}->{$tag_name};
# Line 84  sub get_inner_html ($$$) { Line 84  sub get_inner_html ($$$) {
84          $value =~ s/&/&amp;/g;          $value =~ s/&/&amp;/g;
85          $value =~ s/</&lt;/g;          $value =~ s/</&lt;/g;
86          $value =~ s/>/&gt;/g;          $value =~ s/>/&gt;/g;
87          $value =~ s/"/&quot;/g;          #$value =~ s/"/&quot;/g;
88          $value =~ s/\xA0/&nbsp;/g;          $value =~ s/\xA0/&nbsp;/g;
89          $s .= $value;          $s .= $value;
90        }        }
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.6
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24