1
0
Fork 0
mirror of https://github.com/DBD-SQLite/DBD-SQLite synced 2025-06-07 22:28:47 -04:00

DBD-SQLite: skip_all should be placed before Test::NoWarnings

This commit is contained in:
Kenichi Ishigaki 2009-05-22 01:36:09 +00:00
parent 785244e989
commit 74efd983dc
5 changed files with 10 additions and 5 deletions

View file

@ -10,12 +10,13 @@ BEGIN {
use t::lib::Test; use t::lib::Test;
use Test::More; use Test::More;
use Test::NoWarnings;
BEGIN { BEGIN {
plan skip_all => 'requires DBI v1.608' if $DBI::VERSION < 1.608; plan skip_all => 'requires DBI v1.608' if $DBI::VERSION < 1.608;
} }
use Test::NoWarnings;
plan tests => 10; plan tests => 10;
# Ordinary connect # Ordinary connect

View file

@ -10,12 +10,13 @@ BEGIN {
use t::lib::Test; use t::lib::Test;
use Test::More; use Test::More;
use Test::NoWarnings;
BEGIN { BEGIN {
plan skip_all => 'requires DBI v1.608' if $DBI::VERSION < 1.608; plan skip_all => 'requires DBI v1.608' if $DBI::VERSION < 1.608;
} }
use Test::NoWarnings;
plan tests => 12; plan tests => 12;
my $dbh = connect_ok( my $dbh = connect_ok(

View file

@ -9,12 +9,13 @@ BEGIN {
use t::lib::Test; use t::lib::Test;
use Test::More; use Test::More;
use Test::NoWarnings;
BEGIN { BEGIN {
plan skip_all => 'requires DBI v1.608' if $DBI::VERSION < 1.608; plan skip_all => 'requires DBI v1.608' if $DBI::VERSION < 1.608;
} }
use Test::NoWarnings;
plan tests => 28; plan tests => 28;
sub now { sub now {

View file

@ -8,12 +8,13 @@ BEGIN {
use t::lib::Test; use t::lib::Test;
use Test::More; use Test::More;
use Test::NoWarnings;
BEGIN { BEGIN {
plan skip_all => 'requires DBI v1.608' if $DBI::VERSION < 1.608; plan skip_all => 'requires DBI v1.608' if $DBI::VERSION < 1.608;
} }
use Test::NoWarnings;
plan tests => 22; plan tests => 22;
# Create the aggregate test packages # Create the aggregate test packages

View file

@ -8,12 +8,13 @@ BEGIN {
use t::lib::Test; use t::lib::Test;
use Test::More; use Test::More;
use Test::NoWarnings;
BEGIN { BEGIN {
plan skip_all => 'requires DBI v1.608' if $DBI::VERSION < 1.608; plan skip_all => 'requires DBI v1.608' if $DBI::VERSION < 1.608;
} }
use Test::NoWarnings;
plan tests => 6; plan tests => 6;
my $N_OPCODES = 50; # how many opcodes before calling the progress handler my $N_OPCODES = 50; # how many opcodes before calling the progress handler