Parent Directory
| 
Revision Log
| 
Patch
| revision 1.28 by wakaba, Mon Oct 20 04:21:18 2008 UTC | revision 1.29 by wakaba, Fri Nov 7 08:45:28 2008 UTC | |
|---|---|---|
| # | Line 156 sub text_content ($;$) { | Line 156 sub text_content ($;$) { |
| 156 | my $self = shift; | my $self = shift; |
| 157 | if (@_) { | if (@_) { |
| 158 | @{$self->{child_nodes}} = (); ## NOTE: parent_node not unset. | @{$self->{child_nodes}} = (); ## NOTE: parent_node not unset. |
| 159 | $self->append_child (Whatpm::NanoDOM::Text->new ($_[0])); | $self->append_child (Whatpm::NanoDOM::Text->new ($_[0])) if length $_[0]; |
| 160 | return unless wantarray; | return unless wantarray; |
| 161 | } | } |
| 162 | my $r = ''; | my $r = ''; |
|
||||||||
| admin@suikawiki.org | ViewVC Help |
| Powered by ViewVC 1.1.24 |