loncom/interface/lonquickgrades.pm - diff

Return to lonquickgrades.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.21, 2003/07/17 14:31:17	version 1.24, 2003/08/07 17:26:45
Line 63 sub real_handler {	Line 63 sub real_handler {
&Apache::loncommon::no_cache($r);	&Apache::loncommon::no_cache($r);
$r->send_http_header;	$r->send_http_header;

my $showPoints = 1;	my $showPoints =
if (defined($ENV{'course.'.$ENV{'request.course.id'}.'.grading'}) &&	$ENV{'course.'.$ENV{'request.course.id'}.'.grading'} eq 'standard';
$ENV{'course.'.$ENV{'request.course.id'}.'.grading'} ne 'standard') {
$showPoints = 0;
}

# Create the nav map	# Create the nav map
my $navmap = Apache::lonnavmaps::navmap->new(	my $navmap = Apache::lonnavmaps::navmap->new();
$ENV{"request.course.fn"}.".db",
$ENV{"request.course.fn"}."_parms.db", 1, 0, 1);

if (!defined($navmap)) {	if (!defined($navmap)) {
my $requrl = $r->uri;	my $requrl = $r->uri;
Line 100 HEADER	Line 95 HEADER

$r->rflush();	$r->rflush();

$navmap->init();

# End navmap using boilerplate	# End navmap using boilerplate

my $iterator = $navmap->getIterator(undef, undef, undef, 1);	my $iterator = $navmap->getIterator(undef, undef, undef, 1);