1#!perl -T 2 3use strict; 4use warnings; 5use Test::More; 6use Tenjin; 7 8my $t = Tenjin->new({ path => ['t/data/capture_placeholder'] }); 9ok($t, 'Got a proper Tenjin instance'); 10 11my $context = { exists => 'hello world' }; 12 13# the capture() macro 14is( 15 $t->render('capture.html', $context), 16 "hello world\nI don't have the noexist variable.\n", 17 'capture works' 18); 19 20# the placeholder() macro 21is( 22 $t->render('placeholder.html', $context), 23 "hello world\nI don't have the noexist variable.\n", 24 'placeholder works' 25); 26 27done_testing(); 28