version 1.30, 2008/04/02 12:29:38
|
version 1.31, 2008/05/13 15:06:34
|
Line 49 sub handler {
|
Line 49 sub handler {
|
} |
} |
|
|
#we've got a valid user |
#we've got a valid user |
|
#any locks in place? |
|
my $locknum=&Apache::lonnet::get_locks(); |
|
if ($locknum) { return 409; } |
|
#nope, go ahead |
my @profile; |
my @profile; |
my $lonidsdir=$r->dir_config('lonIDsDir'); |
my $lonidsdir=$r->dir_config('lonIDsDir'); |
&Apache::lonnet::transfer_profile_to_env($lonidsdir,$handle); |
&Apache::lonnet::transfer_profile_to_env($lonidsdir,$handle); |