|
version 1.62.4.1, 2009/09/10 11:39:05
|
version 1.62.4.2, 2010/01/22 13:20:04
|
|
Line 1155 onclick="javascript:document.photoupdate
|
Line 1155 onclick="javascript:document.photoupdate
|
| my ($indexhash,$keylist) = &Apache::lonuserutils::make_keylist_array(); |
my ($indexhash,$keylist) = &Apache::lonuserutils::make_keylist_array(); |
| my $classlist = &Apache::loncoursedata::get_classlist(); |
my $classlist = &Apache::loncoursedata::get_classlist(); |
| my $secidx = &Apache::loncoursedata::CL_SECTION(); |
my $secidx = &Apache::loncoursedata::CL_SECTION(); |
| my ($permission,$allowed) = &Apache::lonuserutils::get_permission(); |
my $crstype =&Apache::loncommon::course_type(); |
| |
my ($permission,$allowed) = &Apache::lonuserutils::get_permission('course',$crstype); |
| foreach my $student (keys(%{$classlist})) { |
foreach my $student (keys(%{$classlist})) { |
| if (exists($permission->{'view_section'})) { |
if (exists($permission->{'view_section'})) { |
| if ($classlist->{$student}[$secidx] ne $permission->{'view_section'}) { |
if ($classlist->{$student}[$secidx] ne $permission->{'view_section'}) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonpopulate.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface