loncom/interface/spreadsheet/lonspreadsheet.pm - diff

Return to lonspreadsheet.pm CVS log

Up to [LON-CAPA] / loncom / interface / spreadsheet

version 1.55, 2009/07/08 17:55:10	version 1.57, 2010/12/02 00:53:46
Line 200 END	Line 200 END
sub handler {	sub handler {
my $r=shift;	my $r=shift;
#	#
# Overload checking
#
# Check this server
my $loaderror=&Apache::lonnet::overloaderror($r);
if ($loaderror) { return $loaderror; }
# Check the course homeserver
$loaderror= &Apache::lonnet::overloaderror($r,
$env{'course.'.$env{'request.course.id'}.'.home'});
# if ($loaderror) { return $loaderror; }
#
# HTML Header	# HTML Header
#	#
if ($r->header_only) {	if ($r->header_only) {
Line 406 ENDSCRIPT	Line 396 ENDSCRIPT
$r->print(&Apache::loncommon::start_page('Grades Spreadsheet',$js).	$r->print(&Apache::loncommon::start_page('Grades Spreadsheet',$js).
&Apache::lonhtmlcommon::breadcrumbs('Spreadsheet',	&Apache::lonhtmlcommon::breadcrumbs('Spreadsheet',
'Spreadsheet_About').	'Spreadsheet_About').
	&Apache::lonhtmlcommon::coursepreflink(&mt('Grade display settings'),'grading').
'<form action="'.$r->uri.'" name="sheet" method="post">');	'<form action="'.$r->uri.'" name="sheet" method="post">');
$r->print(&hiddenfield('sname' ,$env{'form.sname'}).	$r->print(&hiddenfield('sname' ,$env{'form.sname'}).
&hiddenfield('sdomain',$env{'form.sdomain'}).	&hiddenfield('sdomain',$env{'form.sdomain'}).