--- loncom/homework/gradesubmission.pl	2005/10/18 15:33:55	1.1
+++ loncom/homework/gradesubmission.pl	2005/11/16 23:34:27	1.2
@@ -2,7 +2,7 @@
 # The LearningOnline Network with CAPA
 # example submissions grader for use with <externalresponse>
 #
-# $Id: gradesubmission.pl,v 1.1 2005/10/18 15:33:55 albertel Exp $
+# $Id: gradesubmission.pl,v 1.2 2005/11/16 23:34:27 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -54,10 +54,15 @@ sub grade {
 	return ('APPROX_ANS','Go a!');
     } 
     if ($form{'LONCAPA_student_response'} =~ /b/) {
-	return ('EXACT_ANS','Go a!');
+	return ('EXACT_ANS','Go b!');
     }
     if ($form{'LONCAPA_student_response'} =~ /c/) {
 	return ('INCORRECT','No c');
     }
+    if ($form{'LONCAPA_student_response'} eq 
+	$form{'LONCAPA_correct_answer'}) {
+	return ('EXACT_ANS','Yep!');
+    }
+
     return ('INCORRECT','Hrrm');
 }