--- loncom/homework/optionresponse.pm 2011/09/16 22:23:54 1.179 +++ loncom/homework/optionresponse.pm 2011/09/30 16:47:08 1.180 @@ -1,7 +1,7 @@ # LearningOnline Network with CAPA # option list style responses # -# $Id: optionresponse.pm,v 1.179 2011/09/16 22:23:54 raeburn Exp $ +# $Id: optionresponse.pm,v 1.180 2011/09/30 16:47:08 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -155,13 +155,9 @@ ENDTABLE splice(@options,$delopt-1,1); $optchanged=1; } - if ($env{"form.$Apache::lonxml::curdepth.options"}) { + if ($env{"form.$Apache::lonxml::curdepth.options"} ne '') { my $newopt = $env{"form.$Apache::lonxml::curdepth.options"}; - if ($options[0]) { - push(@options,$newopt); - } else { - $options[0]=$newopt; - } + push(@options,$newopt); $optchanged=1; } my $rebuildtag = &Apache::edit::get_new_args($token,$parstack,$safeeval,