oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

still more fixes.

Browse source
This commit is contained in:
Matthew Wilson 2006-01-18 07:05:19 +00:00
parent 8f12dae29c
commit 6f112057bb
5 changed files with 35 additions and 34 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/SQL/ResultSet.pm
View file

@ -209,7 +209,7 @@ sub prepare {
my $class = shift;
my $sql = shift;
my $db = shift;
$db->session->errorHandler->debug("query: ".$sql);
$db->session->errorHandler->query($sql);
my $sth = $db->dbh->prepare($sql) or $db->session->errorHandler->fatal("Couldn't prepare statement: ".$sql." : ". $db->dbh->errstr);
bless {_sth => $sth, _sql => $sql, _db=>$db}, $class;
}
@ -298,7 +298,7 @@ sub unconditionalRead {
my $sql = shift;
my $db = shift;
my $placeholders = shift;
$db->session->errorHandler->debug("query: ".$sql);
$db->session->errorHandler->query($sql);
my $sth = $db->dbh->prepare($sql) or $db->session->errorHandler->warn("Unconditional read failed: ".$sql." : ".$db->dbh->errstr);
if ($sth) {
$sth->execute(@$placeholders) or $db->session->errorHandler->warn("Unconditional read failed: ".$sql." : ".$sth->errstr);