From 75645b089d19ff211dbf19007a7048c0e8f8b521 Mon Sep 17 00:00:00 2001 From: Byron Jones Date: Wed, 12 Jun 2013 16:38:43 +0800 Subject: Bug 882059: fix "use of uninitialized value" warnings, and ignore some errors/warnings --- Bugzilla/Auth.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'Bugzilla/Auth.pm') 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, -- cgit v1.2.3-24-g4f1b