summaryrefslogtreecommitdiff
path: root/t/03-html.t
diff options
context:
space:
mode:
Diffstat (limited to 't/03-html.t')
-rw-r--r--t/03-html.t28
1 files changed, 28 insertions, 0 deletions
diff --git a/t/03-html.t b/t/03-html.t
new file mode 100644
index 0000000..2640a5e
--- /dev/null
+++ b/t/03-html.t
@@ -0,0 +1,28 @@
+#!perl
+use Test::Most 'no_plan','die';
+use strict;
+use warnings;
+use Tree::Template::Declare options => {builder => '+HTML_Element'};
+use Data::Dumper;
+
+my $tree=tree {
+ node {
+ name 'html';
+ node {
+ name 'head';
+ node {
+ name 'title';
+ node { name '~text'; attribs text => 'Page title' };
+ }
+ };
+ node {
+ name 'body';
+ node {
+ name 'p';
+ node { name '~text'; attribs text => 'Page para' };
+ };
+ };
+ };
+};
+
+diag $tree->as_HTML();