D'oh! Fixed comment typo that chaged the meaning of the comment.
Mark Addison [Thu, 7 Aug 2003 15:27:54 +0000 (15:27 +0000)]
t/18ttschema-producer.t

index 5a927ed..53e6457 100644 (file)
@@ -45,12 +45,12 @@ $obj = SQL::Translator->new(
     },
 );
 my $out;
-lives_ok { $out = $obj->translate; }  "Produced template";
-ok $out ne ""                        ,"Output has some content";
+lives_ok { $out = $obj->translate; }  "Translate ran";
+ok $out ne ""                        ,"Produced something!";
 local $/ = undef; # slurp
 eq_or_diff $out, <DATA>              ,"Output looks right";
-# I'm sure if this diff is the best test, it is probaly too sensitive. But it
-# at least it will blow up if anything changes!
+# I'm not sure if this diff is the best test, it is probaly too sensitive. But 
+# it at least it will blow up if anything changes!
 
 print $out if DEBUG;
 #print "Debug:", Dumper($obj) if DEBUG;