From 8e2dfa5ab6404088b65f14b0e3f39362a0b5967d Mon Sep 17 00:00:00 2001
From: "bbaetz%student.usyd.edu.au" <>
Date: Tue, 22 Jan 2002 14:49:22 +0000
Subject: Bug 98368 - dbi connect doesn't use db_port option. Patch by
 gene.stuckey@tellabs.com, r=bbaetz,justdave

---
 globals.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/globals.pl b/globals.pl
index 36e1f86f1..37ecdafbe 100644
--- a/globals.pl
+++ b/globals.pl
@@ -61,6 +61,7 @@ sub globals_pl_sillyness {
 # 
 
 $::db_host = "localhost";
+$::db_port = 3306;
 $::db_name = "bugs";
 $::db_user = "bugs";
 $::db_pass = "";
@@ -105,7 +106,7 @@ sub ConnectToDatabase {
             $name = Param("shadowdb");
             $::dbwritesallowed = 0;
         }
-        $::db = DBI->connect("DBI:mysql:host=$::db_host;database=$name", $::db_user, $::db_pass)
+        $::db = DBI->connect("DBI:mysql:host=$::db_host;database=$name;port=$::db_port", $::db_user, $::db_pass)
             || die "Bugzilla is currently broken. Please try again later. " . 
       "If the problem persists, please contact " . Param("maintainer") .
       ". The error you should quote is: " . $DBI::errstr;
-- 
cgit v1.2.3-24-g4f1b