1
0
Fork 0
mirror of https://github.com/DBD-SQLite/DBD-SQLite synced 2025-06-07 14:19:10 -04:00

Increased use of Test::NoWarnings

This commit is contained in:
Adam Kennedy 2009-04-10 06:30:07 +00:00
parent 3e680309ba
commit 2ac8ee6ee9
8 changed files with 16 additions and 8 deletions

View file

@ -8,8 +8,9 @@ BEGIN {
$^W = 1;
}
use Test::More tests => 6;
use t::lib::Test;
use Test::More tests => 7;
use Test::NoWarnings;
my $dbh = connect_ok();
$dbh->do(<<'END_SQL');

View file

@ -6,8 +6,9 @@ BEGIN {
$^W = 1;
}
use Test::More tests => 11;
use t::lib::Test;
use Test::More tests => 12;
use Test::NoWarnings;
my $dbh = connect_ok();

View file

@ -6,8 +6,9 @@ BEGIN {
$^W = 1;
}
use Test::More tests => 21;
use t::lib::Test;
use Test::More tests => 22;
use Test::NoWarnings;
my $dbh = connect_ok( RaiseError => 1 );
$dbh->do("CREATE TABLE f (f1, f2, f3)");

View file

@ -6,8 +6,9 @@ BEGIN {
$^W = 1;
}
use Test::More tests => 2;
use t::lib::Test;
use Test::More tests => 3;
use Test::NoWarnings;
my $dbh = connect_ok(
AutoCommit => 0,

View file

@ -6,8 +6,9 @@ BEGIN {
$^W = 1;
}
use Test::More tests => 7;
use t::lib::Test;
use Test::More tests => 8;
use Test::NoWarnings;
my $dbh = connect_ok( RaiseError => 1, PrintError => 0 );
eval {

View file

@ -8,8 +8,9 @@ BEGIN {
$^W = 1;
}
use Test::More tests => 10;
use t::lib::Test;
use Test::More tests => 11;
use Test::NoWarnings;
my $dbh = connect_ok(
RaiseError => 1,

View file

@ -7,8 +7,9 @@ BEGIN {
$^W = 1;
}
use Test::More tests => 18;
use t::lib::Test;
use Test::More tests => 19;
use Test::NoWarnings;
sub now {
return time();

View file

@ -6,8 +6,9 @@ BEGIN {
$^W = 1;
}
use Test::More tests => 3;
use t::lib::Test;
use Test::More tests => 4;
use Test::NoWarnings;
my $N_OPCODES = 50; # how many opcodes before calling the progress handler