loncom/homework/grades.pm - diff

Return to grades.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.148, 2003/11/07 08:56:52	version 1.149, 2003/11/07 18:05:33
Line 189 sub get_order {	Line 189 sub get_order {
('grade_courseid' =>	('grade_courseid' =>
$ENV{'request.course.id'}),	$ENV{'request.course.id'}),
('grade_username' => $uname));	('grade_username' => $uname));
(my $debug,$subresult)=split(/_HASH_REF__/,$subresult,2);	(undef,$subresult)=split(/_HASH_REF__/,$subresult,2);
Apache->request->print($debug);
my %analyze=&Apache::lonnet::str2hash($subresult);	my %analyze=&Apache::lonnet::str2hash($subresult);
return ($analyze{"$partid.$respid.shown"});	return ($analyze{"$partid.$respid.shown"});
}	}
Line 1621 KEYWORDS	Line 1620 KEYWORDS
'<br /><br />'.$similar."\n"	'<br /><br />'.$similar."\n"
if ($ENV{'form.lastSub'} eq 'lastonly' \|\|	if ($ENV{'form.lastSub'} eq 'lastonly' \|\|
($ENV{'form.lastSub'} eq 'hdgrade' &&	($ENV{'form.lastSub'} eq 'hdgrade' &&
$$handgrade{$part} =~ /:yes$/));	$$handgrade{$part} eq 'yes'));
}	}
}	}
}	}