loncom/homework/grades.pm - diff

Return to grades.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.638, 2010/10/22 15:29:57	version 1.639, 2010/12/04 15:02:26
Line 44 use Apache::Constants qw(:common);	Line 44 use Apache::Constants qw(:common);
use Apache::lonlocal;	use Apache::lonlocal;
use Apache::lonenc;	use Apache::lonenc;
use Apache::lonstathelpers;	use Apache::lonstathelpers;
	use Apache::lonquickgrades;
use String::Similarity;	use String::Similarity;
use LONCAPA;	use LONCAPA;

Line 9140 sub startpage {	Line 9141 sub startpage {
unshift(@$crumbs,{href=>&href_symb_cmd($symb,'gradingmenu'),text=>"Grading"});	unshift(@$crumbs,{href=>&href_symb_cmd($symb,'gradingmenu'),text=>"Grading"});
$r->print(&Apache::loncommon::start_page('Grading',undef,	$r->print(&Apache::loncommon::start_page('Grading',undef,
{'bread_crumbs' => $crumbs}));	{'bread_crumbs' => $crumbs}));
$r->print('<h3>'.$$crumbs[-1]{'text'}.'</h3>');	&Apache::lonquickgrades::startGradeScreen($r,'grading');
unless ($nodisplayflag) {	unless ($nodisplayflag) {
$r->print(&Apache::lonhtmlcommon::resource_info_box($symb,$onlyfolderflag));	$r->print(&Apache::lonhtmlcommon::resource_info_box($symb,$onlyfolderflag));
}	}
Line 9333 sub handler {	Line 9334 sub handler {
if ($ssi_error) {	if ($ssi_error) {
&ssi_print_error($request);	&ssi_print_error($request);
}	}
	&Apache::lonquickgrades::endGradeScreen($request);
$request->print(&Apache::loncommon::end_page());	$request->print(&Apache::loncommon::end_page());
&reset_caches();	&reset_caches();
return '';	return '';