|
version 1.117, 2005/02/25 23:23:47
|
version 1.118, 2005/03/01 22:25:59
|
|
Line 500 sub get_selected_maps {
|
Line 500 sub get_selected_maps {
|
| } else { |
} else { |
| @selected_maps = ('all'); |
@selected_maps = ('all'); |
| } |
} |
| |
foreach my $map (@selected_maps) { |
| |
if ($map eq 'all') { |
| |
@selected_maps = ('all'); |
| |
last; |
| |
} |
| |
} |
| return @selected_maps; |
return @selected_maps; |
| } |
} |
| |
|
|
Line 599 sub map_select {
|
Line 605 sub map_select {
|
| } |
} |
| $form .= 'size="'.$numvisible.'" >'."\n"; |
$form .= 'size="'.$numvisible.'" >'."\n"; |
| # |
# |
| # Deal with 'all' |
|
| foreach (@selected_maps) { |
|
| if ($_ eq 'all') { |
|
| @selected_maps = ('all'); |
|
| last; |
|
| } |
|
| } |
|
| # |
|
| # Put in option for 'all' |
# Put in option for 'all' |
| $form .= ' <option value="all" '; |
$form .= ' <option value="all" '; |
| foreach (@selected_maps) { |
if ($selected_maps[0] eq 'all') { |
| if ($_ eq 'all') { |
$form .= 'selected '; |
| $form .= 'selected '; |
|
| last; |
|
| } |
|
| } |
} |
| $form .= ">all</option>\n"; |
$form .= ">all</option>\n"; |
| # |
# |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonstatistics.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface