Robustify the tests a little.

[dbsrgits/SQL-Translator.git] / t / 15oracle-parser.t

diff --git a/t/15oracle-parser.t b/t/15oracle-parser.t
index 1c064d5..6377ad2 100644 (file)
--- a/t/15oracle-parser.t
+++ b/t/15oracle-parser.t
@@ -1,10 +1,21 @@
 #!/usr/bin/perl
+# vim: set ft=perl:
 
 use strict;
-use Test::More tests => 76;
+use Test::More;
 use SQL::Translator;
 use SQL::Translator::Schema::Constants;
-use SQL::Translator::Parser::Oracle qw(parse);
+
+eval {
+    require SQL::Translator::Parser::Oracle;
+    SQL::Translator::Parser::Oracle->import('parse');
+};
+if ($@) {
+    plan skip_all => "$@";
+}
+else {
+    plan tests => 76;
+}
 
 my $t   = SQL::Translator->new( trace => 0 );
 my $sql = q[