Return to lonauthcgi.pm CVS log | Up to [LON-CAPA] / loncom / cgi |
version 1.16, 2018/12/22 21:04:56 | version 1.17, 2020/12/18 15:23:04 |
---|---|
Line 92 sub check_ipbased_access { | Line 92 sub check_ipbased_access { |
my ($page,$ip) = @_; | my ($page,$ip) = @_; |
my $allowed; | my $allowed; |
if (!defined($ip)) { | if (!defined($ip)) { |
$ip = $ENV{'REMOTE_ADDR'}; | $ip = &Apache::lonnet::get_requestor_ip(); |
} | } |
if ($ip eq '127.0.0.1') { | if ($ip eq '127.0.0.1') { |
$allowed = 1; | $allowed = 1; |