fix for DBI compatibility

a2b918ec · cyeh%bluemartini.com · 7171d4a4 · a2b918ec
Commit a2b918ec authored Jun 27, 2000 by cyeh%bluemartini.com
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

globals.pl globals.pl +1 -1

No files found.
--- a/globals.pl
+++ b/globals.pl
@@ -132,7 +132,7 @@ sub SendSQL {
    SqlLog($str);
    $::currentquery = $::db->prepare($str);
    $::currentquery->execute
-	|| die "$str: " . $::db->errmsg;
+	|| die "$str: " . $::db->errstr;
    SqlLog("Done");
    if (!$dontshadow && $iswrite && Param("shadowdb")) {
        my $q = SqlQuote($str);