summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorterry%mozilla.org <>2000-02-18 09:43:56 +0100
committerterry%mozilla.org <>2000-02-18 09:43:56 +0100
commitf229fcf58df2bdf86935e2c41085eb0682ecd530 (patch)
tree86fb5b80d0828cbc9bb334b82b77b44e3fd87fdb
parent4ff34e9d3b747097a4bc88efd8171cae832a94e9 (diff)
downloadbugzilla-f229fcf58df2bdf86935e2c41085eb0682ecd530.tar.gz
bugzilla-f229fcf58df2bdf86935e2c41085eb0682ecd530.tar.xz
Wasn't always tweaking LOCK TABLES commands correctly when shadowing. And finally fixed it to actually generate useful SQL error messages.
-rw-r--r--globals.pl6
1 files changed, 3 insertions, 3 deletions
diff --git a/globals.pl b/globals.pl
index 00e1cfd25..702915866 100644
--- a/globals.pl
+++ b/globals.pl
@@ -112,12 +112,12 @@ sub SendSQL {
if ($iswrite && !$::dbwritesallowed) {
die "Evil code attempted to write stuff to the shadow database.";
}
- if ($str =~ /^LOCK TABLES/ && $str !~ /shadowlog/) {
- $str =~ s/^LOCK TABLES/LOCK TABLES shadowlog WRITE, /;
+ if ($str =~ /^LOCK TABLES/i && $str !~ /shadowlog/) {
+ $str =~ s/^LOCK TABLES/LOCK TABLES shadowlog WRITE, /i;
}
SqlLog($str);
$::currentquery = $::db->query($str)
- || die "$str: $::db_errstr";
+ || die "$str: " . $::db->errmsg;
SqlLog("Done");
if (!$dontshadow && $iswrite && Param("shadowdb")) {
my $q = SqlQuote($str);