10 more tests for methods in Session/Style.pm
Refactored generateAdditionalHeadTags to remove two loops.
This commit is contained in:
parent
d7a90bd48d
commit
5920a6d482
2 changed files with 55 additions and 11 deletions
|
|
@ -79,14 +79,8 @@ sub generateAdditionalHeadTags {
|
|||
# generate additional raw tags
|
||||
my $tags = $self->{_raw};
|
||||
# generate additional link tags
|
||||
foreach my $url (keys %{$self->{_link}}) {
|
||||
$tags .= $self->{_link}{$url};
|
||||
}
|
||||
# generate additional javascript tags
|
||||
foreach my $url (keys %{$self->{_javascript}}) {
|
||||
$tags .= $self->{_javascript}{$url};
|
||||
}
|
||||
delete $self->{_meta};
|
||||
$tags .= join '', values %{ $self->{_link} }, values %{ $self->{_javascript} };
|
||||
delete $self->{_raw};
|
||||
delete $self->{_javascript};
|
||||
delete $self->{_link};
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue