From: cyeh%bluemartini.com <>
Date: Tue, 9 May 2000 01:23:55 +0000 (+0000)
Subject: fix warnings on DBID_to_real_or_loginname. thanks to endico@mozilla.org
X-Git-Tag: bugzilla-2.12~300
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=70d77267d95e95942fb5030fa930ed442cfe2a7f;p=thirdparty%2Fbugzilla.git

fix warnings on DBID_to_real_or_loginname. thanks to endico@mozilla.org
---

diff --git a/globals.pl b/globals.pl
index 32772df565..014aec5cbc 100644
--- a/globals.pl
+++ b/globals.pl
@@ -550,7 +550,7 @@ sub DBID_to_real_or_loginname {
     my ($id) = (@_);
     SendSQL("SELECT login_name,realname FROM profiles WHERE userid = $id");
     my ($l, $r) = FetchSQLData();
-    if ($r eq "") {
+    if (!defined $r || $r eq "") {
         return $l;
     } else {
         return "$l ($r)";
@@ -562,7 +562,7 @@ sub DBID_to_name {
     if (!defined $::cachedNameArray{$id}) {
         SendSQL("select login_name from profiles where userid = $id");
         my $r = FetchOneColumn();
-        if ($r eq "") {
+        if (!defined $r || $r eq "") {
             $r = "__UNKNOWN__";
         }
         $::cachedNameArray{$id} = $r;