version 1.160, 2014/02/26 01:18:49
|
version 1.163, 2016/08/14 16:13:22
|
Line 366 sub section_or_group_text {
|
Line 366 sub section_or_group_text {
|
|
|
sub get_students { |
sub get_students { |
if (! @Students) { |
if (! @Students) { |
&PrepareClasslist() |
&PrepareClasslist(); |
} |
} |
return @Students; |
return @Students; |
} |
} |
Line 547 sub SectionSelect {
|
Line 547 sub SectionSelect {
|
&PrepareClasslist() |
&PrepareClasslist() |
} |
} |
# |
# |
|
# Make sure course's student table is up to date |
|
if (@Sections) { |
|
&Apache::loncoursedata::ensure_current_sections(); |
|
} |
|
# |
# Build the form element |
# Build the form element |
my $Str = "\n"; |
my $Str = "\n"; |
$Str .= '<select name="'.$elementname.'" '; |
$Str .= '<select name="'.$elementname.'" '; |
Line 582 sub GroupSelect {
|
Line 587 sub GroupSelect {
|
&PrepareClasslist(); |
&PrepareClasslist(); |
} |
} |
# |
# |
|
# Make sure course's groupnames and studentgroups tables |
|
# are up to date. |
|
# |
|
if (@Groups) { |
|
&Apache::loncoursedata::ensure_current_groups(); |
|
&Apache::loncoursedata::ensure_current_students_groups(); |
|
} |
|
# |
# Build the form element |
# Build the form element |
my $Str = "\n"; |
my $Str = "\n"; |
$Str .= '<select name="'.$elementname.'" '; |
$Str .= '<select name="'.$elementname.'" '; |
Line 868 ENDSTYLE
|
Line 881 ENDSTYLE
|
# |
# |
# Clean out the caches |
# Clean out the caches |
if (exists($env{'form.ClearCache'})) { |
if (exists($env{'form.ClearCache'})) { |
&Apache::loncoursedata::delete_caches($env{'requres.course.id'}); |
&Apache::loncoursedata::delete_caches($env{'request.course.id'}); |
} |
} |
# |
# |
my $GoToPage = $env{'form.reportSelected'}; |
my $GoToPage = $env{'form.reportSelected'}; |