version 1.7, 2017/01/30 00:16:31
|
version 1.8, 2020/12/18 15:23:03
|
Line 298 sub init_webdav_env {
|
Line 298 sub init_webdav_env {
|
\%userenv,\%domdef,\%is_adv); |
\%userenv,\%domdef,\%is_adv); |
@env{keys(%disk_env)} = @disk_env{keys(%disk_env)}; |
@env{keys(%disk_env)} = @disk_env{keys(%disk_env)}; |
untie(%disk_env); |
untie(%disk_env); |
my $ip = $r->get_remote_host(); |
my $ip = &Apache::lonnet::get_requestor_ip($r); |
&Apache::lonnet::log($udom,$uname,$uhome, |
&Apache::lonnet::log($udom,$uname,$uhome, |
"Login webdav/$author $ip"); |
"Login webdav/$author $ip"); |
} |
} |