X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/f22a9debc2c3c50828c31ff028057734a4aadea6..9a4d89685edcb4399aa500d38de84b0101ad09b2:/common.inc.plp diff --git a/common.inc.plp b/common.inc.plp index fb1d54a..e48cd2c 100644 --- a/common.inc.plp +++ b/common.inc.plp @@ -57,6 +57,7 @@ sub Html { ref $_ eq 'ARRAY' and $_ = join ' ', @$_ for $meta->{description}; ref $_ eq 'ARRAY' and $_ = join ', ', @$_ for $meta->{keywords}; ref $_ eq 'ARRAY' and $_ = join "\n", @$_ for $meta->{rawstyle}, $meta->{raw}; + ref $_ eq 'ARRAY' and $_ = stylesheet(@$_)."\n" for $meta->{stylesheet}; # other vars my $sep = $meta->{charset} eq 'utf-8' ? '•' : ' -- '; @@ -65,8 +66,7 @@ sub Html { # leading output $header{content_type} = "text/html; charset=$meta->{charset}"; print <<"EOT"; - + @@ -76,14 +76,14 @@ sub Html { EOT - print stylesheet(@$_), "\n" for $meta->{stylesheet} || (); + print $_, "\n" for $meta->{stylesheet} || (); print $_, "\n" for $meta->{raw} || (); print qq{\n\n\n}; # prepare trailing output PLP_END { print <<"EOT"; - EOT