Fix for bug 66149: better error message on connection failures. Patch by…

Fix for bug 66149: better error message on connection failures. Patch by shie9022@msmailhub.oulan.ou.edu (Alan Shields)

Fix for bug 66149: better error message on connection failures. Patch by…
81843d6e · dave%intrec.com · cbd206cb · 81843d6e
Commit 81843d6e authored Feb 02, 2001 by dave%intrec.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
@@ -91,7 +91,7 @@ sub ConnectToDatabase {
            $::dbwritesallowed = 0;
        }
 	$::db = DBI->connect("DBI:mysql:host=$::db_host;database=$name", $::db_user, $::db_pass)
-            || die "Can't connect to database server.\n";
+	    || die $DBI::errstr;
    }
 }