1#!perl -T
2
3use strict;
4use warnings;
5use Test::More tests => 3;
6use Tenjin;
7use Try::Tiny;
8
9my $t = Tenjin->new({ path => ['t/data/fail'] });
10ok($t, 'Got a proper Tenjin instance');
11
12my $output = try { $t->render('fail.html') } catch { 'failed'; };
13
14is(
15	$output,
16	'failed',
17	'failure caught'
18);
19
20my $output2 = try { $t->render('no_fail.html') } catch { 'failed'; };
21
22is(
23	$output2,
24	1,
25	'all okay'
26);
27