1#!perl -T
2
3use strict;
4use warnings;
5use Test::More tests => 3;
6use Tenjin;
7use utf8;
8
9my $t = Tenjin->new({ path => ['t/data/encoding'] });
10ok($t, 'Got a proper Tenjin instance');
11
12is($t->render('hebrew.html'), "<h1>ג'רי סיינפלד</h1>\n", 'UTF-8 (Hebrew) properly decoded');
13
14is($t->render('chinese.html'), "<a title=\"汉语/漢語\">Chinese</a>\n", 'UTF-8 (Chinese) properly decoded');
15