6 use Test::More tests => 5;
9 use_ok( 'WebPAC::Test' );
10 use_ok( 'WebPAC::Output::TT' );
13 ok(my $tt = new WebPAC::Output::TT(
14 include_path => "$abs_path../conf/output/tt",
22 'display' => [ 'foo' ]
27 'search' => [ 'bar' ],
28 'lookup_key' => [ 'bar' ]
30 'filename' => [ 'out/thes/001.html' ],
35 throws_ok { $tt->apply( template => 'foo', data => [] ) } qr/error.*foo/, "apply without template";
37 cmp_ok(my $text = $tt->apply( template => 'text.tt', data => $ds ), '=~', qr/Source.*foo/, "apply");