X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F19sybase-parser.t;h=fc9d23928ea6025949598ed8e716634e177812c0;hb=db195df8af1efc7fb983ec6041fcb064dada7124;hp=0324b1f970c6f51914b41182f34589cac1a56209;hpb=520437737901f22635b56f9d4bfab7c58dc699cf;p=dbsrgits%2FSQL-Translator.git

diff --git a/t/19sybase-parser.t b/t/19sybase-parser.t
index 0324b1f..fc9d239 100644
--- a/t/19sybase-parser.t
+++ b/t/19sybase-parser.t
@@ -5,10 +5,15 @@
 use strict;
 
 use FindBin qw/$Bin/;
-use Test::More tests => 41;
+use Test::More;
+use Test::SQL::Translator qw(maybe_plan);
 use SQL::Translator;
 use SQL::Translator::Schema::Constants;
-use SQL::Translator::Parser::Sybase qw(parse);
+
+BEGIN {
+    maybe_plan(41, 'SQL::Translator::Parser::Sybase');
+    SQL::Translator::Parser::Sybase->import('parse');
+}
 
 my $file = "$Bin/data/sybase/create.sql";
 
@@ -101,6 +106,6 @@ is( scalar @tables, 9, 'Nine tables' );
     is( scalar @constraints, 1, 'One constraint' );
 
     is( $constraints[0]->type, UNIQUE, 'Constraint is UNIQUE' );
-    is( join(',', $constraints[0]->fields), 
+    is( join(',', $constraints[0]->fields),
         'mdinfo,mdaver_end,srvver_end', 'On "mdinfo,mdaver_end,srvver_end"' );
 }