From: Ken Youens-Clark Date: Fri, 6 Jun 2003 22:41:42 +0000 (+0000) Subject: Fixed test numbers. X-Git-Tag: v0.02~70 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=30e3372edfe160c9c533533878fd7e98602a43df;p=dbsrgits%2FSQL-Translator.git Fixed test numbers. --- diff --git a/t/08postgres-to-mysql.t b/t/08postgres-to-mysql.t index d7f6d2c..19a668b 100644 --- a/t/08postgres-to-mysql.t +++ b/t/08postgres-to-mysql.t @@ -2,7 +2,7 @@ # vim: set ft=perl: use strict; -use Test::More 'no_plan'; # tests => 1; +use Test::More tests => 1; use SQL::Translator; use Data::Dumper; diff --git a/t/15oracle-parser.t b/t/15oracle-parser.t index f969a25..1a87477 100644 --- a/t/15oracle-parser.t +++ b/t/15oracle-parser.t @@ -1,7 +1,7 @@ #!/usr/bin/perl use strict; -use Test::More 'no_plan'; #tests => 105; +use Test::More tests => 72; use SQL::Translator; use SQL::Translator::Schema::Constants; use SQL::Translator::Parser::Oracle qw(parse); @@ -62,9 +62,6 @@ $| = 1; my $data = parse( $t, $sql ); my $schema = $t->schema; -#use Data::Dumper; -#print Dumper($schema), "\n"; - isa_ok( $schema, 'SQL::Translator::Schema', 'Schema object' ); my @tables = $schema->get_tables; is( scalar @tables, 4, 'Found four tables' );