loncom/homework/grades.pm - diff

Return to grades.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.90, 2003/05/30 20:57:40	version 1.91, 2003/05/30 21:20:20
Line 2659 sub displayPage {	Line 2659 sub displayPage {
if($curRes == $iterator->END_MAP) { $depth++; }	if($curRes == $iterator->END_MAP) { $depth++; }

if (ref($curRes) && $curRes->is_problem() && !$curRes->randomout) {	if (ref($curRes) && $curRes->is_problem() && !$curRes->randomout) {
my $parts = ['0',@{$curRes->parts()}];	my $parts = $curRes->parts();
&APache::lonnet::logthis("parts ".join(':',@$parts));
my $title = $curRes->compTitle();	my $title = $curRes->compTitle();
my $symbx = $curRes->symb();	my $symbx = $curRes->symb();
$studentTable.='<tr bgcolor="#ffffe6"><td align="center" valign="top" >'.$question.	$studentTable.='<tr bgcolor="#ffffe6"><td align="center" valign="top" >'.$question.
Line 2792 sub updateGradeByPage {	Line 2791 sub updateGradeByPage {
if($curRes == $iterator->END_MAP) { $depth++; }	if($curRes == $iterator->END_MAP) { $depth++; }

if (ref($curRes) && $curRes->is_problem() && !$curRes->randomout) {	if (ref($curRes) && $curRes->is_problem() && !$curRes->randomout) {
my $parts = ['0',@{$curRes->parts()}];	my $parts = $curRes->parts();
&APache::lonnet::logthis("parts ".join(':',@$parts));
my $title = $curRes->compTitle();	my $title = $curRes->compTitle();
my $symbx = $curRes->symb();	my $symbx = $curRes->symb();
$studentTable.='<tr bgcolor="#ffffe6"><td align="center" valign="top" >'.$question.	$studentTable.='<tr bgcolor="#ffffe6"><td align="center" valign="top" >'.$question.