|
version 1.213, 2022/12/01 01:28:26
|
version 1.214, 2023/06/20 14:03:52
|
|
Line 616 sub print_roles_queued {
|
Line 616 sub print_roles_queued {
|
| $output .= '</ul></p>'; |
$output .= '</ul></p>'; |
| if (keys(%touser)) { |
if (keys(%touser)) { |
| foreach my $key (keys(%touser)) { |
foreach my $key (keys(%touser)) { |
| my ($uname,$udom) = split(/:/,$touser{$key}); |
my ($uname,$udom) = split(/:/,$key); |
| if (&Apache::lonnet::put('nohist_queuedrolereqs',$touser{$key},$udom,$uname) eq 'ok') { |
if (&Apache::lonnet::put('nohist_queuedrolereqs',$touser{$key},$udom,$uname) eq 'ok') { |
| my $owndomdesc = &Apache::lonnet::domain($udom); |
my $owndomdesc = &Apache::lonnet::domain($udom); |
| &Apache::loncoursequeueadmin::send_selfserve_notification($uname.':'.$udom, |
&Apache::loncoursequeueadmin::send_selfserve_notification($uname.':'.$udom, |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonuserutils.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface