648 |
|
|
649 |
## NOTE: |set_inner_html| copies most of this method's code |
## NOTE: |set_inner_html| copies most of this method's code |
650 |
|
|
651 |
|
## Confidence: irrelevant. |
652 |
$self->{confident} = 1 unless exists $self->{confident}; |
$self->{confident} = 1 unless exists $self->{confident}; |
653 |
|
|
654 |
$self->{document}->input_encoding ($self->{input_encoding}) |
$self->{document}->input_encoding ($self->{input_encoding}) |
655 |
if defined $self->{input_encoding}; |
if defined $self->{input_encoding}; |
656 |
## TODO: |{input_encoding}| is needless? |
## TODO: |{input_encoding}| is needless? |
5492 |
my $onerror = $_[1]; |
my $onerror = $_[1]; |
5493 |
my $get_wrapper = $_[2] || sub ($) { return $_[0] }; |
my $get_wrapper = $_[2] || sub ($) { return $_[0] }; |
5494 |
|
|
|
## ISSUE: Should {confident} be true? |
|
|
|
|
5495 |
my $nt = $node->node_type; |
my $nt = $node->node_type; |
5496 |
if ($nt == 9) { # Document (invoke the algorithm with no /context/ element) |
if ($nt == 9) { # Document (invoke the algorithm with no /context/ element) |
5497 |
# MUST |
# MUST |
5706 |
$anode = $anode->parent_node; |
$anode = $anode->parent_node; |
5707 |
} # AN |
} # AN |
5708 |
|
|
5709 |
|
## F.5. Set the input stream. |
5710 |
|
$self->{confident} = 1; ## Confident: irrelevant. |
5711 |
|
|
5712 |
## F.6. Start the parser. |
## F.6. Start the parser. |
5713 |
{ |
{ |
5714 |
my $self = $p; |
my $self = $p; |