Parent Directory
|
Revision Log
|
Patch
| revision 1.9 by wakaba, Sat Jul 14 10:28:52 2007 UTC | revision 1.10 by wakaba, Sat Jul 14 16:32:28 2007 UTC | |
|---|---|---|
| # | Line 37 sub whole_text ($) { | Line 37 sub whole_text ($) { |
| 37 | my $doc = $_[0]->owner_document; | my $doc = $_[0]->owner_document; |
| 38 | my $tw1 = $doc->create_tree_walker | my $tw1 = $doc->create_tree_walker |
| 39 | ($doc, 0xFFFFFFFF, sub { # SHOW_ALL ENTITY_REFERENCE_NODE | ($doc, 0xFFFFFFFF, sub { # SHOW_ALL ENTITY_REFERENCE_NODE |
| 40 | ($_[1]->node_type == 5) ? 3 : 1; # FILTER_SKIP FILTER_ACCEPT | ($_[0]->node_type == 5) ? 3 : 1; # FILTER_SKIP FILTER_ACCEPT |
| 41 | }, 1); | }, 1); |
| 42 | $tw1->current_node ($_[0]); | $tw1->current_node ($_[0]); |
| 43 |
|
||||||||
| admin@suikawiki.org | ViewVC Help |
| Powered by ViewVC 1.1.24 |