From ff238d36024ea1e58d8cfa1c797487c313b4d8d7 Mon Sep 17 00:00:00 2001
From: "tara%tequilarista.org" <>
Date: Tue, 31 Oct 2000 03:17:43 +0000
Subject: correcting scope

---
 globals.pl | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

(limited to 'globals.pl')

diff --git a/globals.pl b/globals.pl
index e1dab238d..f8bb4e217 100644
--- a/globals.pl
+++ b/globals.pl
@@ -54,10 +54,10 @@ sub globals_pl_sillyness {
 # here
 # 
 
-my $db_host = "localhost";
-my $db_name = "bugs";
-my $db_user = "bugs";
-my $db_pass = "";
+$::db_host = "localhost";
+$::db_name = "bugs";
+$::db_user = "bugs";
+$::db_pass = "";
 
 do 'localconfig';
 
@@ -84,13 +84,13 @@ $::superusergroupset = "9223372036854775807";
 sub ConnectToDatabase {
     my ($useshadow) = (@_);
     if (!defined $::db) {
-        my $name = $db_name;
+        my $name = $::db_name;
         if ($useshadow && Param("shadowdb") && Param("queryagainstshadowdb")) {
             $name = Param("shadowdb");
             $::dbwritesallowed = 0;
         }
-	$::db = DBI->connect("DBI:mysql:host=$db_host;database=$name", $db_user, $db_pass)
-            || die "Can't connect to database server.";
+	$::db = DBI->connect("DBI:mysql:host=$::db_host;database=$name", $::db_user, $::db_pass)
+            || die "Can't connect to database server.\n";
     }
 }
 
-- 
cgit v1.2.3-24-g4f1b