summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--t/block-helpers.t22
-rw-r--r--t/bugs.t34
2 files changed, 22 insertions, 34 deletions
diff --git a/t/block-helpers.t b/t/block-helpers.t
index 52e275f..36ab76c 100644
--- a/t/block-helpers.t
+++ b/t/block-helpers.t
@@ -528,4 +528,26 @@ RENDERED
"object hierarchy access (RT#94792)"
);
+render_ok(
+ <<TEMPLATE,
+{{{outer}}}
+{{#each elements}}
+{{{inner}}}
+{{/each}}
+TEMPLATE
+ {
+ outer => '<em>example</em>',
+ elements => [
+ { inner => '<em>text</em>' },
+ { inner => '<h1>text</h1>' },
+ ]
+ },
+ <<RENDERED,
+<em>example</em>
+<em>text</em>
+<h1>text</h1>
+RENDERED
+ "raw variable access inside block helpers (#6)"
+);
+
done_testing;
diff --git a/t/bugs.t b/t/bugs.t
deleted file mode 100644
index b7a71a7..0000000
--- a/t/bugs.t
+++ /dev/null
@@ -1,34 +0,0 @@
-#!/usr/bin/env perl
-use strict;
-use warnings;
-use lib 't/lib';
-use Test::More;
-use Test::Handlebars;
-
-my $vars = {
- outer => '<em>example</em>',
- elements => [
- { inner => '<em>text</em>' },
- { inner => '<h1>text</h1>' },
- ]
-};
-my $template = <<EOL;
-{{{outer}}}
-{{#each elements}}
-{{{inner}}}
-{{/each}}
-EOL
-my $expected = <<EOL;
-<em>example</em>
-<em>text</em>
-<h1>text</h1>
-EOL
-
-render_ok(
- $template,
- $vars,
- $expected,
- "doy/text-handlebars#6"
-);
-
-done_testing;