version 1.44, 2008/01/05 18:36:26
|
version 1.45, 2008/01/06 04:27:25
|
Line 1307 sub print_userlist {
|
Line 1307 sub print_userlist {
|
} |
} |
$r->rflush(); |
$r->rflush(); |
if ($context eq 'course') { |
if ($context eq 'course') { |
my $classlist = &Apache::loncoursedata::get_classlist(); |
if ($env{'form.showrole'} eq 'st' || ($env{'form.showrole'} eq 'Any') { |
%userlist = %{$classlist}; |
my $classlist = &Apache::loncoursedata::get_classlist(); |
|
%userlist = %{$classlist}; |
|
} |
if ($env{'form.showrole'} ne 'st') { |
if ($env{'form.showrole'} ne 'st') { |
my $showroles; |
my $showroles; |
if ($env{'form.showrole'} ne 'Any') { |
if ($env{'form.showrole'} ne 'Any') { |