Allow dots in parameter key names
[ikiwiki] / t / template_syntax.t
1 #!/usr/bin/perl
2 use warnings;
3 use strict;
4 use Test::More;
5
6 my @templates=glob("templates/*.tmpl"), glob("doc/templates/*.mdwn");
7 plan(tests => 2*@templates);
8
9 use HTML::Template;
10
11 foreach my $template (@templates) {
12         my $obj=eval {HTML::Template->new(filename => $template)};
13         ok(! $@, $template." $@");
14         ok($obj, $template);
15 }