From a97d48ec24e5e7d931bd8a0dc39c597ce758d106 Mon Sep 17 00:00:00 2001
From: "lpsolit%gmail.com" <>
Date: Tue, 20 Jun 2006 00:30:23 +0000
Subject: Bug 338793: Remove DBID_to_name() from globals.pl - Patch by Frédéric
 Buclin <LpSolit@gmail.com> r=vladd a=justdave
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 globals.pl | 22 ----------------------
 1 file changed, 22 deletions(-)

(limited to 'globals.pl')

diff --git a/globals.pl b/globals.pl
index b4c71a28e..a1e87eec2 100644
--- a/globals.pl
+++ b/globals.pl
@@ -138,28 +138,6 @@ sub GetVersionTable {
     $::VersionTableLoaded = 1;
 }
 
-sub DBID_to_name {
-    my ($id) = (@_);
-    return "__UNKNOWN__" if !defined $id;
-    # $id should always be a positive integer
-    if ($id =~ m/^([1-9][0-9]*)$/) {
-        $id = $1;
-    } else {
-        $::cachedNameArray{$id} = "__UNKNOWN__";
-    }
-    if (!defined $::cachedNameArray{$id}) {
-        PushGlobalSQLState();
-        SendSQL("SELECT login_name FROM profiles WHERE userid = $id");
-        my $r = FetchOneColumn();
-        PopGlobalSQLState();
-        if (!defined $r || $r eq "") {
-            $r = "__UNKNOWN__";
-        }
-        $::cachedNameArray{$id} = $r;
-    }
-    return $::cachedNameArray{$id};
-}
-
 # Returns a list of all the legal values for a field that has a
 # list of legal values, like rep_platform or resolution.
 sub get_legal_field_values {
-- 
cgit v1.2.3-24-g4f1b