BEGIN {
eval {require Template;};
- plan skip_all => "Template v2.15 is is incompatible with SQL::Translator 0.08+"
- if !$@ && Template->VERSION >= 2.15;
+
+ if ( $@ ) {
+ plan skip_all => 'Template not installed?'
+ }
maybe_plan(6,
'XML::XPath',
to => "TTSchema",
producer_args => {
ttfile => "$Bin/data/template/basic.tt",
-# ttfile => "$Bin/data/template/test.tt",
tt_vars => {
foo => 'bar',
hello => 'world',
);
my $out;
lives_ok { $out = $obj->translate; } "Translate ran";
-# print STDERR "Output: $out\n";
ok $out ne "" ,"Produced something!";
local $/ = undef; # slurp
eq_or_diff $out, <DATA> ,"Output looks right";