--- loncom/homework/response.pm 2018/09/02 16:51:51 1.244.2.1 +++ loncom/homework/response.pm 2021/01/12 15:57:18 1.244.2.3 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # various response type definitons response definition # -# $Id: response.pm,v 1.244.2.1 2018/09/02 16:51:51 raeburn Exp $ +# $Id: response.pm,v 1.244.2.3 2021/01/12 15:57:18 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -468,8 +468,8 @@ sub end_customresponse { $error = $award; $award = 'ERROR'; } - if (($award eq 'INCORRECT' || $award eq 'APPROX_ANS' || - $award eq 'EXACT_ANS')) { + if (($award eq 'INCORRECT') || ($award eq 'APPROX_ANS') || + ($award eq 'EXACT_ANS') || ($award eq 'ASSIGNED_SCORE')) { if ($Apache::lonhomework::type eq 'survey') { $award='SUBMITTED'; } elsif ($Apache::lonhomework::type eq 'surveycred') { @@ -1307,7 +1307,7 @@ sub submitted { return 1; } # Submit All button on a .page was pressed - if (defined($env{'form.all_submit'})) { return 1; } + if ($env{'form.all_submit'}) { return 1; } # otherwise no submission occurred return 0; }