--- loncom/homework/response.pm 2008/09/05 21:32:56 1.201 +++ loncom/homework/response.pm 2008/09/08 16:08:36 1.202 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # various response type definitons response definition # -# $Id: response.pm,v 1.201 2008/09/05 21:32:56 riegler Exp $ +# $Id: response.pm,v 1.202 2008/09/08 16:08:36 riegler Exp $ # # Copyright Michigan State University Board of Trustees # @@ -486,9 +486,6 @@ sub start_mathresponse { $safeeval); $Apache::inputtags::answertxt{$id}=[$answer]; } - if ($Apache::inputtags::status['-1'] eq 'CAN_ANSWER') { - $result.=&edit_mathresponse_button($id,"HWVAL_$id"); - } } elsif ($target eq 'edit') { $result.=&Apache::edit::tag_start($target,$token); @@ -575,6 +572,9 @@ sub end_mathresponse { } if ($target eq 'web') { &setup_prior_tries_hash(\&format_prior_response_math); + if (($Apache::inputtags::status['-1'] eq 'CAN_ANSWER') && (&Apache::lonxml::get_param('turnoneditor',$parstack,$safeeval) ne 'no')) { + $result.=&edit_mathresponse_button($id,"HWVAL_$id"); + } } pop(@Apache::lonxml::namespace);