--- loncom/homework/default_homework.lcpm 2004/10/21 02:43:34 1.91 +++ loncom/homework/default_homework.lcpm 2005/03/28 19:20:54 1.95 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # used by lonxml::xmlparse() as input variable $safeinit to Apache::run::run() # -# $Id: default_homework.lcpm,v 1.91 2004/10/21 02:43:34 albertel Exp $ +# $Id: default_homework.lcpm,v 1.95 2005/03/28 19:20:54 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -163,6 +163,8 @@ sub caparesponse_check { elsif ($result == '9') { $result='ANS_CNT_NOT_MATCH'; } elsif ($result =='10') { $result='SUB_RECORDED'; } elsif ($result =='11') { $result='BAD_FORMULA'; } + elsif ($result =='12' && !$response) { $result='MISSING_ANSWER'; } + elsif ($result =='12') { $result='WANTED_NUMERIC'; } elsif ($result =='13') { $result='UNIT_INVALID_INSTRUCTOR'; } elsif ($result =='141') { $result='UNIT_INVALID_STUDENT'; } elsif ($result =='142') { $result='UNIT_INVALID_STUDENT'; } @@ -540,7 +542,7 @@ sub chemparse { $formula .= '⇌ '; } else { $formula .= &web('<=> ','\ensuremath{\rightleftharpoons} ', - '<=$gt; '); + '<=> '); } next; } @@ -560,7 +562,6 @@ sub chemparse { } # get rid of trailing space $formula =~ s/(\ \;| )$//; - return &xmlparse($formula); }