Update tests to use maybe_plan.

[dbsrgits/SQL-Translator.git] / t / 21xml-xmi-parser.t

diff --git a/t/21xml-xmi-parser.t b/t/21xml-xmi-parser.t
index 15939c5..558252e 100644 (file)
--- a/t/21xml-xmi-parser.t
+++ b/t/21xml-xmi-parser.t
@@ -19,6 +19,7 @@ use constant DEBUG => (exists $opt{d} ? 1 : 0);
 
 use Test::More;
 use Test::Exception;
+use Test::SQL::Translator qw(maybe_plan);
 use SQL::Translator;
 use SQL::Translator::Schema::Constants;
 
@@ -78,7 +79,9 @@ sub test_table {
 # Testing 1,2,3,..
 #=============================================================================
 
-plan tests => 103;
+maybe_plan(103,
+    'SQL::Translator::Parser::XML::XMI',
+    'SQL::Translator::Producer::MySQL');
 
 my $testschema = "$Bin/data/xmi/Foo.poseidon2.xmi";
 die "Can't find test schema $testschema" unless -e $testschema;