--- loncom/homework/response.pm 2008/09/08 16:08:36 1.202 +++ loncom/homework/response.pm 2008/12/11 04:11:09 1.206.2.1 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # various response type definitons response definition # -# $Id: response.pm,v 1.202 2008/09/08 16:08:36 riegler Exp $ +# $Id: response.pm,v 1.206.2.1 2008/12/11 04:11:09 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -288,6 +288,7 @@ sub check_for_previous { $previous{'last'}='1'; } if (! $previous{'award'} ) { $previous{'award'} = 'UNKNOWN'; } + if ($previous{'award'} eq 'INTERNAL_ERROR') { $previous{'used'}=0; } &Apache::lonxml::debug("got a match :$previous{'award'}:$previous{'used'}:"); } } @@ -572,7 +573,10 @@ 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')) { + my $partid = $Apache::inputtags::part; + my $id = $Apache::inputtags::response[-1]; + if (($Apache::inputtags::status['-1'] eq 'CAN_ANSWER') + && (&Apache::lonnet::EXT('resource.'.$partid.'_'.$id.'.turnoffeditor') ne 'yes')) { $result.=&edit_mathresponse_button($id,"HWVAL_$id"); } } @@ -677,7 +681,7 @@ sub start_responseparam { } } if (defined($optionlist)) { - $result.='Use template:
'; } @@ -1189,7 +1193,7 @@ sub submitted { } # Submit All button on a .page was pressed if (defined($env{'form.all_submit'})) { return 1; } - # otherwise no submission occured + # otherwise no submission occurred return 0; }