Changes template to non-URI-encode headers

And also adds tests for it; changes main template too. Closes #50
Raku · Dec 8, 2018 · 5b4e4d3 · 5b4e4d3
1 parent a489b34
commit 5b4e4d3
Show file tree

Hide file tree

Showing 3 changed files with 8 additions and 3 deletions.
diff --git a/resources/templates/main.mustache b/resources/templates/main.mustache
@@ -15,7 +15,7 @@
         </style>
         {{# css }}<link rel="stylesheet" href="{{ css }}">{{/ css }}
         {{# metadata }}{{{ metadata }}}{{/ metadata }}
-        {{ head }}
+        {{{ head }}}
     </head>
     <body class="pod">
     <div id="___top"></div>

diff --git a/t/120-templates.t b/t/120-templates.t
@@ -1,7 +1,7 @@
 use Test; # -*- mode: perl6 -*- 
 use Test::Output;
 use Pod::To::HTML;
-plan 4;
+plan 5;
 my $r;
 
 =begin pod
@@ -35,3 +35,8 @@ ok $r ~~ ms[[
 $r = pod2html $=pod[0], :templates("t/templates");
 ok $r ~~ ms[[  '<meta description="This is a new template"/>' ]], 'Gets text from new template';
 ok $r ~~ ms[[ "<h1 class='title'>The usual suspects</h1>" ]], 'Fills template correctly';
+
+my $head='<meta name=viewport content="width=device-width, initial-scale=1">';
+$r = pod2html $=pod[0], :templates("t/templates"), :$head ;
+ok $r ~~ ms[[ $head ]], 'headers are redered as is';
+
diff --git a/t/templates/main.mustache b/t/templates/main.mustache
@@ -16,7 +16,7 @@
         </style>
         {{# css }}<link rel="stylesheet" href="{{ css }}">{{/ css }}
         {{# metadata }}{{{ metadata }}}{{/ metadata }}
-        {{ head }}
+        {{{ head }}}
     </head>
     <body class="pod">
     <div id="___top"></div>