Tab/WS crusade

[dbsrgits/SQL-Translator.git] / t / 19sybase-parser.t

diff --git a/t/19sybase-parser.t b/t/19sybase-parser.t
index c705e9c..fc9d239 100644 (file)
--- a/t/19sybase-parser.t
+++ b/t/19sybase-parser.t
@@ -5,10 +5,15 @@
 use strict;
 
 use FindBin qw/$Bin/;
-use Test::More 'no_plan'; #tests => 1;
+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"' );
 }