diff options
author | terry%mozilla.org <> | 2000-02-18 09:43:56 +0100 |
---|---|---|
committer | terry%mozilla.org <> | 2000-02-18 09:43:56 +0100 |
commit | f229fcf58df2bdf86935e2c41085eb0682ecd530 (patch) | |
tree | 86fb5b80d0828cbc9bb334b82b77b44e3fd87fdb | |
parent | 4ff34e9d3b747097a4bc88efd8171cae832a94e9 (diff) | |
download | bugzilla-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.pl | 6 |
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); |