From 8b7138baf6e7be3d9184c97c4f6525459ab1af40 Mon Sep 17 00:00:00 2001 From: Mischa POSLAWSKY Date: Sat, 22 Apr 2017 13:49:12 +0200 Subject: [PATCH] common: prepare stylesheet links early to fix cookies Broken in commit v1.9-29-g8c3e7dc648 (2017-04-10) [common: join stylesheets html inline]. --- common.inc.plp | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/common.inc.plp b/common.inc.plp index bfeb244..7935a8e 100644 --- a/common.inc.plp +++ b/common.inc.plp @@ -105,6 +105,10 @@ sub Html { ref $_ eq 'ARRAY' or $_ = [$_] for grep {$_} $meta->{raw}, $meta->{description}, $meta->{keywords}; + # document headers before output + $header{content_type} = "text/html; charset=$meta->{charset}"; + unshift @{ $meta->{raw} }, stylesheet($meta->{stylesheet}); + # optional amends push @{ $meta->{raw} }, ( '', @@ -116,7 +120,6 @@ sub Html { ) if $meta->{keys}; # leading output - $header{content_type} = "text/html; charset=$meta->{charset}"; say ''; say ''; say ''; @@ -129,7 +132,6 @@ sub Html { for join(', ', @{ $meta->{keywords} }) || (); say ''; say ''; - say for stylesheet($meta->{stylesheet}); say for map { @{$_} } $meta->{raw} || (); say '' if $Dev; say ''; -- 2.30.0