X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F06xsv.t;h=125a1af6a825474c4e8b8d2d2061c09af7f66894;hb=16bbaff2e6bcffcb7495f3b308a623a0023cbf6d;hp=733dd46637ee459b75cc5c48cb579cee2b2fce90;hpb=dddbae2a716aa03a21638e88b02c3aff19384b3c;p=dbsrgits%2FSQL-Translator.git diff --git a/t/06xsv.t b/t/06xsv.t index 733dd46..125a1af 100644 --- a/t/06xsv.t +++ b/t/06xsv.t @@ -8,8 +8,13 @@ use strict; use SQL::Translator; use SQL::Translator::Schema; use SQL::Translator::Schema::Constants; -use SQL::Translator::Parser::xSV qw(parse); -use Test::More tests => 25; +use Test::More; +use Test::SQL::Translator qw(maybe_plan); + +BEGIN { + maybe_plan(25, 'SQL::Translator::Parser::xSV'); + SQL::Translator::Parser::xSV->import('parse'); +} my $tr = SQL::Translator->new; my $s = SQL::Translator::Schema->new; @@ -57,7 +62,7 @@ is( $f6->size, '6', 'Size is "6"' ); my $f7 = $fields[6]; is( $f7->name, 'Seven', 'Seventh field name is "Seven"' ); is( $f7->data_type, 'float', 'Data type is "float"' ); -is( $f7->size, '1,2', 'Size is "1,2"' ); +is( $f7->size, '3,2', 'Size is "3,2"' ); my @indices = $table->get_indices; is( scalar @indices, 0, 'Correct number of indices (0)' );