|
version 1.168, 2014/06/13 11:14:35
|
version 1.169, 2014/12/15 01:11:49
|
|
Line 5267 sub set_login {
|
Line 5267 sub set_login {
|
| sub course_sections { |
sub course_sections { |
| my ($sections_count,$role,$current_sec) = @_; |
my ($sections_count,$role,$current_sec) = @_; |
| my $output = ''; |
my $output = ''; |
| my @sections = (sort {$a <=> $b} keys %{$sections_count}); |
my @sections = (sort {$a <=> $b} keys(%{$sections_count})); |
| my $numsec = scalar(@sections); |
my $numsec = scalar(@sections); |
| my $is_selected = ' selected="selected"'; |
my $is_selected = ' selected="selected"'; |
| if ($numsec <= 1) { |
if ($numsec <= 1) { |
![[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