From: Chris Sharp Date: Wed, 24 Jan 2018 17:34:46 +0000 (-0500) Subject: fix IP redirection by pulling the X-Real-IP header X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=acfdbf4f86dced354dee9c9ef90041012a72968e;p=evergreen%2Fpines.git fix IP redirection by pulling the X-Real-IP header --- diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/Redirect.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/Redirect.pm index c0533dbff5..b2dda544e0 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/Redirect.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/Redirect.pm @@ -58,7 +58,7 @@ sub handler { my $cgi = CGI->new( $apache ); my $hostname = $cgi->server_name(); my $proto = ($cgi->https) ? 'https' : 'http'; - my $user_ip = $ENV{REMOTE_ADDR}; + my $user_ip = $apache->headers_in->{'X-Real-IP'}; # Extract the port number from the user requested URL. my $port = '';