mirror of
https://github.com/DBD-SQLite/DBD-SQLite
synced 2025-06-08 14:48:32 -04:00
DBD::SQLite: better hide the intentional error
This commit is contained in:
parent
2e0020b3eb
commit
1dcd2489c0
1 changed files with 3 additions and 1 deletions
|
@ -9,12 +9,14 @@ BEGIN {
|
||||||
use Test::More tests => 4;
|
use Test::More tests => 4;
|
||||||
use t::lib::Test;
|
use t::lib::Test;
|
||||||
|
|
||||||
my $dbh = connect_ok( PrintError => 1, RaiseError => 0 );
|
my $dbh = connect_ok( PrintError => 0, RaiseError => 0 );
|
||||||
|
|
||||||
my $sth = $dbh->prepare('CREATE TABLE foo (f)');
|
my $sth = $dbh->prepare('CREATE TABLE foo (f)');
|
||||||
|
|
||||||
$dbh->disconnect;
|
$dbh->disconnect;
|
||||||
|
|
||||||
|
$sth->{PrintError} = 1;
|
||||||
|
|
||||||
# attempt to execute on inactive database handle
|
# attempt to execute on inactive database handle
|
||||||
my @warning = ();
|
my @warning = ();
|
||||||
SCOPE: {
|
SCOPE: {
|
||||||
|
|
Loading…
Add table
Reference in a new issue