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

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

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

revision 1.206 by wakaba, Mon Oct 13 08:22:30 2008 UTC revision 1.207 by wakaba, Mon Oct 13 08:27:44 2008 UTC
# Line 70  sub SCRIPT_EL () { SPECIAL_EL | 0b101 } Line 70  sub SCRIPT_EL () { SPECIAL_EL | 0b101 }
70  sub ADDRESS_DIV_EL () { SPECIAL_EL | ADDRESS_DIV_P_EL | 0b001 }  sub ADDRESS_DIV_EL () { SPECIAL_EL | ADDRESS_DIV_P_EL | 0b001 }
71  sub BODY_EL () { SPECIAL_EL | ALL_END_TAG_OPTIONAL_EL | 0b001 }  sub BODY_EL () { SPECIAL_EL | ALL_END_TAG_OPTIONAL_EL | 0b001 }
72    
73  sub DD_EL () {  sub DTDD_EL () {
   SPECIAL_EL |  
   END_TAG_OPTIONAL_EL |  
   ALL_END_TAG_OPTIONAL_EL |  
   0b001  
 }  
 sub DT_EL () {  
74    SPECIAL_EL |    SPECIAL_EL |
75    END_TAG_OPTIONAL_EL |    END_TAG_OPTIONAL_EL |
76    ALL_END_TAG_OPTIONAL_EL |    ALL_END_TAG_OPTIONAL_EL |
# Line 170  my $el_category = { Line 164  my $el_category = {
164    colgroup => MISC_SPECIAL_EL,    colgroup => MISC_SPECIAL_EL,
165    command => MISC_SPECIAL_EL,    command => MISC_SPECIAL_EL,
166    datagrid => MISC_SPECIAL_EL,    datagrid => MISC_SPECIAL_EL,
167    dd => DD_EL,    dd => DTDD_EL,
168    details => MISC_SPECIAL_EL,    details => MISC_SPECIAL_EL,
169    dialog => MISC_SPECIAL_EL,    dialog => MISC_SPECIAL_EL,
170    dir => MISC_SPECIAL_EL,    dir => MISC_SPECIAL_EL,
171    div => ADDRESS_DIV_EL,    div => ADDRESS_DIV_EL,
172    dl => MISC_SPECIAL_EL,    dl => MISC_SPECIAL_EL,
173    dt => DT_EL,    dt => DTDD_EL,
174    em => FORMATTING_EL,    em => FORMATTING_EL,
175    embed => MISC_SPECIAL_EL,    embed => MISC_SPECIAL_EL,
176    eventsource => MISC_SPECIAL_EL,    eventsource => MISC_SPECIAL_EL,
# Line 7164  sub _tree_construction_main ($) { Line 7158  sub _tree_construction_main ($) {
7158    
7159          ## 1.          ## 1.
7160          for my $node (reverse @{$self->{open_elements}}) {          for my $node (reverse @{$self->{open_elements}}) {
7161            if ($node->[1] == DT_EL or $node->[1] == DD_EL) {            if ($node->[1] == DTDD_EL) {
7162              ## 2. (a) As if </li>              ## 2. (a) As if </li>
7163              {              {
7164                ## If no </li> - not applied                ## If no </li> - not applied
Legend:
Removed from v.1.206  
changed lines
  Added in v.1.207
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24