![[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|
Return to optionresponse.pm CVS log | Up to [LON-CAPA] / loncom / homework |
| version 1.40, 2002/05/23 18:02:03 | version 1.41, 2002/06/21 20:36:30 |
|---|---|
| Line 132 ENDTABLE | Line 132 ENDTABLE |
| if ($optchanged) { | if ($optchanged) { |
| $result = "<foilgroup options=\"("; | $result = "<foilgroup options=\"("; |
| foreach my $option (@options) { | foreach my $option (@options) { |
| $option=~s/\'/\\\'/; | $option=~s/\'/\\\'/g; |
| &Apache::lonxml::debug("adding option :$option:"); | &Apache::lonxml::debug("adding option :$option:"); |
| $result .="'".$option."',"; | $result .="'".$option."',"; |
| } | } |