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