Return to lonauthcgi.pm CVS log | Up to [LON-CAPA] / loncom / cgi |
version 1.14.2.1, 2019/02/03 22:10:43 | version 1.14.2.2, 2021/01/04 03:57: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; |