Some updates to tests to skip when required dependencies are missing.
Ken Youens-Clark [Mon, 13 Sep 2004 18:16:48 +0000 (18:16 +0000)]
t/15oracle-parser.t
t/18ttschema-producer.t
t/26sybase.t
t/31dumper.t

index 4660857..a5098e4 100644 (file)
@@ -19,7 +19,8 @@ my $sql = q[
         trait_category              VARCHAR2(100)   NOT NULL,
         UNIQUE ( trait_category )
     );
-    comment on table qtl_trait_category is 'hey, hey, hey, hey';
+    COMMENT ON TABLE qtl_trait_category IS 
+    'hey, hey, hey, hey';
     comment on column qtl_trait_category.qtl_trait_category_id 
         is 'the primary key!';
 
index 91d5bd9..9284223 100644 (file)
@@ -20,7 +20,12 @@ use FindBin qw/$Bin/;
 #=============================================================================
 
 BEGIN {
-    maybe_plan(3, 'Template', 'Test::Differences')
+    maybe_plan(3, 
+        'XML::XPath', 
+        'SQL::Translator::Parser::XML::SQLFairy'
+        'Template', 
+        'Test::Differences'
+    )
 }
 use Test::Differences;
 
index d512038..b108fdb 100755 (executable)
@@ -3,11 +3,17 @@
 #
 
 # $Source: /home/faga/work/sqlfairy_svn/sqlfairy-cvsbackup/sqlfairy/t/26sybase.t,v $
-# $Id: 26sybase.t,v 1.1 2003-10-08 18:28:36 phrrngtn Exp $
+# $Id: 26sybase.t,v 1.2 2004-09-13 18:16:48 kycl4rk Exp $
 
 use strict;
+use Test::More;
+use Test::SQL::Translator qw(maybe_plan);
 
-use Test::More tests => 3;
+BEGIN {
+    maybe_plan(3,
+        'SQL::Translator::Parser::DBI::Sybase',
+    );  
+}
 
 use_ok('SQL::Translator::Parser::DBI::Sybase');
 use_ok('SQL::Translator::Parser::Storable');
index 8c59d62..1f42e13 100644 (file)
@@ -16,6 +16,7 @@ use Symbol qw(gensym);
 BEGIN {
     maybe_plan(
         5, 
+        'DBI',
         'SQL::Translator::Parser::SQLite',
         'SQL::Translator::Producer::Dumper'
     );