--- loncom/homework/inputtags.pm 2021/12/30 03:54:45 1.333.2.12.2.1 +++ loncom/homework/inputtags.pm 2023/02/05 00:17:42 1.333.2.13 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # input definitons # -# $Id: inputtags.pm,v 1.333.2.12.2.1 2021/12/30 03:54:45 raeburn Exp $ +# $Id: inputtags.pm,v 1.333.2.13 2023/02/05 00:17:42 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -473,8 +473,10 @@ sub start_textline { $result .= &spellcheck_onblur($itemid, $spellcheck); if (($Apache::inputtags::status['-1'] eq 'CAN_ANSWER') && - (($tagstack->[-2] eq 'formularesponse') || ($tagstack->[-2] eq 'mathresponse')) && - (&Apache::lonnet::EXT('resource.'.$partid.'_'.$id.'.turnoffeditor') ne 'yes')) { + (((($tagstack->[-2] eq 'formularesponse') || ($tagstack->[-2] eq 'mathresponse')) && + (&Apache::lonnet::EXT('resource.'.$partid.'_'.$id.'.turnoffeditor') ne 'yes')) || + (($tagstack->[-2] eq 'customresponse') && + (&Apache::lonnet::EXT('resource.'.$partid.'_'.$id.'.turnoffeditor') eq 'no')))) { $result.=&edit_mathresponse_button($input_tag_id); } } @@ -1349,8 +1351,7 @@ sub decideoutput { my $first_access=&Apache::lonnet::get_first_access($interval[1]); if (defined($first_access)) { my $due_date= &Apache::lonnet::EXT("resource.$part.duedate"); - my ($timelimit) = ($interval[0] =~ /^(\d+)/); - unless (($due_date) && ($due_date < $first_access + $timelimit)) { + unless (($due_date) && ($due_date < $first_access + $interval[0])) { $message = &mt("Answer Submitted: Your final submission will be graded when the time limit is reached."); } }