Bug 1294571 - 015remote_ip.t throws a "uninitialized value" warning

diff --git a/Bugzilla/Util.pm b/Bugzilla/Util.pm
index dc41652f7a141e6f6fe7cfc7b573d2fb04e00dff..1a867c5ee2f0b49ec3026f2a253ab16e480603db 100644 (file)
--- a/Bugzilla/Util.pm
+++ b/Bugzilla/Util.pm
@@ -291,7 +291,7 @@ sub remote_ip {
     my @x_forwarded_for = split(/[\s,]+/, $ENV{HTTP_X_FORWARDED_FOR} // '');
 
     return $remote_ip unless @x_forwarded_for;
-    return $x_forwarded_for[0] if $proxies[0] eq '*';
+    return $x_forwarded_for[0] if (@proxies && $proxies[0] eq '*');
     return $remote_ip if none { $_ eq $remote_ip } @proxies;
 
     foreach my $ip (reverse @x_forwarded_for) {