summaryrefslogtreecommitdiffstats
path: root/Bugzilla/Auth.pm
diff options
context:
space:
mode:
authorByron Jones <bjones@mozilla.com>2013-06-12 10:38:43 +0200
committerByron Jones <bjones@mozilla.com>2013-06-12 10:38:43 +0200
commit75645b089d19ff211dbf19007a7048c0e8f8b521 (patch)
treeded403839e76d753e99d6825a32e8232643d2393 /Bugzilla/Auth.pm
parentb9915abd8c37fd3c48a84ab8463c9765b6e20814 (diff)
downloadbugzilla-75645b089d19ff211dbf19007a7048c0e8f8b521.tar.gz
bugzilla-75645b089d19ff211dbf19007a7048c0e8f8b521.tar.xz
Bug 882059: fix "use of uninitialized value" warnings, and ignore some errors/warnings
Diffstat (limited to 'Bugzilla/Auth.pm')
-rw-r--r--Bugzilla/Auth.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/Bugzilla/Auth.pm b/Bugzilla/Auth.pm
index ab741965a..7775a03c9 100644
--- a/Bugzilla/Auth.pm
+++ b/Bugzilla/Auth.pm
@@ -221,7 +221,8 @@ sub _handle_login_result {
# For IPv6 we'll need to use inet_pton which requires Perl 5.12.
my $n = inet_aton($address);
if ($n) {
- $address = gethostbyaddr($n, AF_INET) . " ($address)"
+ my $host = gethostbyaddr($n, AF_INET);
+ $address = "$host ($address)" if $host;
}
my $vars = {
locked_user => $user,