quiet some warnings

This commit is contained in:
Graham Knop 2008-09-30 20:03:52 +00:00
parent 79cbb85285
commit bbdcb6475a
4 changed files with 16 additions and 6 deletions

View file

@ -50,7 +50,11 @@ ok($sth->rows > 1, "rows()");
ok($sth->finish, "finish()");
# unconditionalRead
ok(my $sth = $session->db->unconditionalRead("select * from tableThatDoesntExist"), "unconditionalRead()");
{
# we know this will fail, so keep it quiet
local $SIG{__WARN__} = sub {};
ok(my $sth = $session->db->unconditionalRead("select * from tableThatDoesntExist"), "unconditionalRead()");
}
# errorCode
is($sth->errorCode, "1146" ,"errorCode()");