--- loncom/homework/response.pm 2004/09/24 19:44:00 1.104 +++ loncom/homework/response.pm 2004/09/27 22:47:49 1.105 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # various response type definitons response definition # -# $Id: response.pm,v 1.104 2004/09/24 19:44:00 albertel Exp $ +# $Id: response.pm,v 1.105 2004/09/27 22:47:49 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -533,9 +533,9 @@ sub getresponse { $response; if ($resulttype ne 'letter') { if ($resulttype eq 'A is 1') { - $response = $let_to_num{$response}; - } else { $response = $let_to_num{$response}+1; + } else { + $response = $let_to_num{$response}; } } } else {