1920 |
}; # $clear_up_to_marker |
}; # $clear_up_to_marker |
1921 |
|
|
1922 |
my $style_start_tag = sub { |
my $style_start_tag = sub { |
1923 |
my $style_el; !!!create-element ($style_el, 'style'); |
my $style_el; !!!create-element ($style_el, 'style', $token->{attributes}); |
1924 |
## $self->{insertion_mode} eq 'in head' and ... (always true) |
## $self->{insertion_mode} eq 'in head' and ... (always true) |
1925 |
(($self->{insertion_mode} eq 'in head' and defined $self->{head_element}) |
(($self->{insertion_mode} eq 'in head' and defined $self->{head_element}) |
1926 |
? $self->{head_element} : $self->{open_elements}->[-1]->[0]) |
? $self->{head_element} : $self->{open_elements}->[-1]->[0]) |