|
version 1.212.2.4, 2008/12/17 18:47:08
|
version 1.212.2.5, 2009/04/04 13:47:50
|
|
Line 576 sub selectbox {
|
Line 576 sub selectbox {
|
| foreach my $id (@idlist) { |
foreach my $id (@idlist) { |
| $selout.='<option value="'.$id.'"'; |
$selout.='<option value="'.$id.'"'; |
| if ($id eq $value) { |
if ($id eq $value) { |
| $selout.=' selected>'.&{$functionref}($_).'</option>'; |
$selout.=' selected="selected">'.&{$functionref}($id).'</option>'; |
| } else { |
} else { |
| $selout.='>'.&{$functionref}($id).'</option>'; |
$selout.='>'.&{$functionref}($id).'</option>'; |
| } |
} |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonmeta.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface