version 1.269.2.39.2.8, 2023/12/30 00:07:09
|
version 1.269.2.39.2.9, 2024/02/27 16:52:46
|
Line 2600 sub update_session_roles {
|
Line 2600 sub update_session_roles {
|
} |
} |
} else { |
} else { |
$newrole{$rolekey} = $status_in_db; |
$newrole{$rolekey} = $status_in_db; |
|
if ($role eq 'au') { |
|
my %userenv = |
|
&Apache::lonnet::userenvironment($env{'user.domain'}, |
|
$env{'user.name'},'authoreditors'); |
|
if ($userenv{'authoreditors'}) { |
|
$userenv{'editors'} = $userenv{'authoreditors'}; |
|
} else { |
|
my %domdef = &Apache::lonnet::get_domain_defaults($env{'user.domain'}); |
|
if ($domdef{'editors'} ne '') { |
|
$userenv{'editors'} = $domdef{'editors'}; |
|
} else { |
|
$userenv{'editors'} = 'edit,xml'; |
|
} |
|
} |
|
&Apache::lonnet::appenv(\%userenv); |
|
} |
} |
} |
} |
} |
} |
} |