|
version 1.132, 2006/02/06 21:59:23
|
version 1.135, 2006/03/15 17:10:49
|
|
Line 414 sub displayfoils {
|
Line 414 sub displayfoils {
|
| foreach my $option (@opt) { |
foreach my $option (@opt) { |
| my $escopt=&HTML::Entities::encode($option,'\'"&<>'); |
my $escopt=&HTML::Entities::encode($option,'\'"&<>'); |
| if ($option eq $lastopt) { |
if ($option eq $lastopt) { |
| $optionlist.="<option value='".$escopt."' selected=\"on\">$option</option>\n"; |
$optionlist.="<option value='".$escopt."' selected=\"selected\">$option</option>\n"; |
| } else { |
} else { |
| $optionlist.="<option value='".$escopt."'>$option</option>\n"; |
$optionlist.="<option value='".$escopt."'>$option</option>\n"; |
| } |
} |
![[BACK]](/icons/back.gif){kind=icon}
Return to optionresponse.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework