Return to loncommon.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.1251, 2016/08/25 22:33:02 | version 1.1252, 2016/08/31 19:08:19 |
---|---|
Line 5306 sub check_ip_acc { | Line 5306 sub check_ip_acc { |
return 1; | return 1; |
} | } |
my $allowed; | my $allowed; |
my $ip=$env{'request.host'} || $ENV{'REMOTE_ADDR'} || $clientip; | my $ip=$ENV{'REMOTE_ADDR'} || $clientip || $env{'request.host'}; |
my $name; | my $name; |
my %access = ( | my %access = ( |