170 |
sub inner_html ($;$) { |
sub inner_html ($;$) { |
171 |
my $self = $_[0]; |
my $self = $_[0]; |
172 |
|
|
173 |
## TODO: Setter |
if (@_ > 1) { |
174 |
|
## TODO: Setter ... |
175 |
|
Whatpm::HTML->set_inner_html ($self, $_[1]); |
176 |
|
return unless defined wantarray; |
177 |
|
} |
178 |
|
|
179 |
if (${$$self->{owner_document}}->{manakai_is_html}) { |
if (${$$self->{owner_document}}->{manakai_is_html}) { |
180 |
require Whatpm::HTML::Serializer; |
require Whatpm::HTML::Serializer; |
181 |
return ${ Whatpm::HTML::Serializer->get_inner_html ($self) }; |
return ${ Whatpm::HTML::Serializer->get_inner_html ($self) }; |