|
version 1.692.4.26, 2010/01/19 16:42:15
|
version 1.692.4.27, 2010/01/27 16:15:23
|
|
Line 1882 sub select_form {
|
Line 1882 sub select_form {
|
| $selectform.= |
$selectform.= |
| '<option value="'.&HTML::Entities::encode($key,'"<>&').'" '. |
'<option value="'.&HTML::Entities::encode($key,'"<>&').'" '. |
| ($key eq $def ? 'selected="selected" ' : ''). |
($key eq $def ? 'selected="selected" ' : ''). |
| ">".&mt($hash{$key})."</option>\n"; |
">".$hash{$key}."</option>\n"; |
| } |
} |
| $selectform.="</select>"; |
$selectform.="</select>"; |
| return $selectform; |
return $selectform; |
![[BACK]](/icons/back.gif){kind=icon}
Return to loncommon.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface