/[suikacvs]/markup/html/whatpm/Whatpm/SWML/Parser.pm
Suika

Diff of /markup/html/whatpm/Whatpm/SWML/Parser.pm

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

revision 1.6 by wakaba, Fri Nov 7 12:35:39 2008 UTC revision 1.8 by wakaba, Sun Nov 9 10:05:46 2008 UTC
# Line 433  sub parse_char_string ($$$;$) { Line 433  sub parse_char_string ($$$;$) {
433        my $image = $doc->create_element_ns (SW09_NS, [undef, 'image']);        my $image = $doc->create_element_ns (SW09_NS, [undef, 'image']);
434        $image->set_user_data (manakai_source_line => $line);        $image->set_user_data (manakai_source_line => $line);
435        $image->set_user_data (manakai_source_column => 1);        $image->set_user_data (manakai_source_column => 1);
436        $image->text_content (join "\x0A", $s, @s);        $image->text_content (join "\x0A", @s);
437        ($line, $column) = ($line + @s, 1);        ($line, $column) = ($line + @s, 1);
438        @s = ();        @s = ();
439        $doc->document_element->append_child ($image);        $doc->document_element->append_child ($image);
# Line 544  sub parse_char_string ($$$;$) { Line 544  sub parse_char_string ($$$;$) {
544                        Q => [HTML_NS, 'q'],                        Q => [HTML_NS, 'q'],
545                        QN => [SW10_NS, 'qn'],                        QN => [SW10_NS, 'qn'],
546                        RUBY => [HTML_NS, 'ruby'],                        RUBY => [HTML_NS, 'ruby'],
547                        RUBYB => [HTML_NS, 'rubyb'],                        RUBYB => [SW09_NS, 'rubyb'],
548                        SAMP => [HTML_NS, 'samp'],                        SAMP => [HTML_NS, 'samp'],
549                        SPAN => [HTML_NS, 'span'],                        SPAN => [HTML_NS, 'span'],
550                        SRC => [SW10_NS, 'src'],                        SRC => [SW10_NS, 'src'],
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.8
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24