Cleaned up, Template version no longer a problem(?).
Ken Youens-Clark [Wed, 15 Apr 2009 17:37:08 +0000 (17:37 +0000)]
t/18ttschema-producer.t

index d4c1e93..67233ad 100644 (file)
@@ -17,8 +17,10 @@ use FindBin qw/$Bin/;
 
 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', 
@@ -42,7 +44,6 @@ use SQL::Translator::Producer::TTSchema;
         to             => "TTSchema",
         producer_args  => {
             ttfile  => "$Bin/data/template/basic.tt",
-#            ttfile  => "$Bin/data/template/test.tt",
             tt_vars => {
                 foo   => 'bar',
                 hello => 'world',
@@ -51,7 +52,6 @@ use SQL::Translator::Producer::TTSchema;
     );
     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";