--- loncom/homework/grades.pm 2001/11/29 23:16:29 1.17
+++ loncom/homework/grades.pm 2001/12/07 23:43:46 1.18
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# The LON-CAPA Grading handler
#
-# $Id: grades.pm,v 1.17 2001/11/29 23:16:29 albertel Exp $
+# $Id: grades.pm,v 1.18 2001/12/07 23:43:46 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -260,6 +260,10 @@ sub submission {
my $rendered=&Apache::loncommon::get_student_view($symb,$uname,$udom,
$ENV{'request.course.id'});
$result.="Student's view of the problem:
$rendered
Correct answer:";
+
+ my $answer=&Apache::loncommon::get_student_answers($symb,$uname,$udom,
+ $ENV{'request.course.id'});
+ $result.=$answer;
return $result;
}