mirror of
https://github.com/DBD-SQLite/DBD-SQLite
synced 2025-06-07 22:28:47 -04:00
Increased use of Test::NoWarnings
This commit is contained in:
parent
3e680309ba
commit
2ac8ee6ee9
8 changed files with 16 additions and 8 deletions
|
@ -8,8 +8,9 @@ BEGIN {
|
||||||
$^W = 1;
|
$^W = 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
use Test::More tests => 6;
|
|
||||||
use t::lib::Test;
|
use t::lib::Test;
|
||||||
|
use Test::More tests => 7;
|
||||||
|
use Test::NoWarnings;
|
||||||
|
|
||||||
my $dbh = connect_ok();
|
my $dbh = connect_ok();
|
||||||
$dbh->do(<<'END_SQL');
|
$dbh->do(<<'END_SQL');
|
||||||
|
|
|
@ -6,8 +6,9 @@ BEGIN {
|
||||||
$^W = 1;
|
$^W = 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
use Test::More tests => 11;
|
|
||||||
use t::lib::Test;
|
use t::lib::Test;
|
||||||
|
use Test::More tests => 12;
|
||||||
|
use Test::NoWarnings;
|
||||||
|
|
||||||
my $dbh = connect_ok();
|
my $dbh = connect_ok();
|
||||||
|
|
||||||
|
|
|
@ -6,8 +6,9 @@ BEGIN {
|
||||||
$^W = 1;
|
$^W = 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
use Test::More tests => 21;
|
|
||||||
use t::lib::Test;
|
use t::lib::Test;
|
||||||
|
use Test::More tests => 22;
|
||||||
|
use Test::NoWarnings;
|
||||||
|
|
||||||
my $dbh = connect_ok( RaiseError => 1 );
|
my $dbh = connect_ok( RaiseError => 1 );
|
||||||
$dbh->do("CREATE TABLE f (f1, f2, f3)");
|
$dbh->do("CREATE TABLE f (f1, f2, f3)");
|
||||||
|
|
|
@ -6,8 +6,9 @@ BEGIN {
|
||||||
$^W = 1;
|
$^W = 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
use Test::More tests => 2;
|
|
||||||
use t::lib::Test;
|
use t::lib::Test;
|
||||||
|
use Test::More tests => 3;
|
||||||
|
use Test::NoWarnings;
|
||||||
|
|
||||||
my $dbh = connect_ok(
|
my $dbh = connect_ok(
|
||||||
AutoCommit => 0,
|
AutoCommit => 0,
|
||||||
|
|
|
@ -6,8 +6,9 @@ BEGIN {
|
||||||
$^W = 1;
|
$^W = 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
use Test::More tests => 7;
|
|
||||||
use t::lib::Test;
|
use t::lib::Test;
|
||||||
|
use Test::More tests => 8;
|
||||||
|
use Test::NoWarnings;
|
||||||
|
|
||||||
my $dbh = connect_ok( RaiseError => 1, PrintError => 0 );
|
my $dbh = connect_ok( RaiseError => 1, PrintError => 0 );
|
||||||
eval {
|
eval {
|
||||||
|
|
|
@ -8,8 +8,9 @@ BEGIN {
|
||||||
$^W = 1;
|
$^W = 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
use Test::More tests => 10;
|
|
||||||
use t::lib::Test;
|
use t::lib::Test;
|
||||||
|
use Test::More tests => 11;
|
||||||
|
use Test::NoWarnings;
|
||||||
|
|
||||||
my $dbh = connect_ok(
|
my $dbh = connect_ok(
|
||||||
RaiseError => 1,
|
RaiseError => 1,
|
||||||
|
|
|
@ -7,8 +7,9 @@ BEGIN {
|
||||||
$^W = 1;
|
$^W = 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
use Test::More tests => 18;
|
|
||||||
use t::lib::Test;
|
use t::lib::Test;
|
||||||
|
use Test::More tests => 19;
|
||||||
|
use Test::NoWarnings;
|
||||||
|
|
||||||
sub now {
|
sub now {
|
||||||
return time();
|
return time();
|
||||||
|
|
|
@ -6,8 +6,9 @@ BEGIN {
|
||||||
$^W = 1;
|
$^W = 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
use Test::More tests => 3;
|
|
||||||
use t::lib::Test;
|
use t::lib::Test;
|
||||||
|
use Test::More tests => 4;
|
||||||
|
use Test::NoWarnings;
|
||||||
|
|
||||||
my $N_OPCODES = 50; # how many opcodes before calling the progress handler
|
my $N_OPCODES = 50; # how many opcodes before calling the progress handler
|
||||||
|
|
||||||
|
|
Loading…
Add table
Reference in a new issue