Bug 57819 - change the size of the bit we print in the large error case. r=justdave.

diff --git a/globals.pl b/globals.pl
index b2ab3167ae66816821976065a07ec6ddf0e045fd..1228d02c853ff1bfddb6f6c8404432aa3efcfb11 100644 (file)
--- a/globals.pl
+++ b/globals.pl
@@ -214,8 +214,8 @@ sub SendSQL {
     if (!$::currentquery->execute) {
         my $errstr = $::db->errstr;
         # Cut down the error string to a reasonable.size
-        $errstr = substr($errstr, 0, 100) . ' ... ' . substr($errstr, -100)
-                if length($errstr) > 200;
+        $errstr = substr($errstr, 0, 2000) . ' ... ' . substr($errstr, -2000)
+                if length($errstr) > 4000;
         die "$str: " . $errstr;
     }
     SqlLog("Done");