loncom/interface/lonsimplepage.pm - diff

Return to lonsimplepage.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonsimplepage.pm between versions 1.36 and 1.37

version 1.36, 2006/03/29 20:07:00	version 1.37, 2006/04/07 21:56:02
Line 52 sub handler {	Line 52 sub handler {
# Is this even in a course?	# Is this even in a course?
unless ($env{'request.course.id'}) {	unless ($env{'request.course.id'}) {
if ($target ne 'tex') {	if ($target ne 'tex') {
return &Apache::loncommon::simple_error_page($r,'',	&Apache::loncommon::simple_error_page($r,'','Not in a course');
'Not in a course');
} else {	} else {
$r->print('\textbf{Not in a course}\end{document}');	$r->print('\textbf{Not in a course}\end{document}');
}	}
	return OK;
}	}

my $dom = $env{'course.'.$env{'request.course.id'}.'.domain'};	my $dom = $env{'course.'.$env{'request.course.id'}.'.domain'};
Line 72 sub handler {	Line 72 sub handler {
$namespace = 'grppage_'.$marker;	$namespace = 'grppage_'.$marker;
my %curr_groups;	my %curr_groups;
if (!&Apache::loncommon::coursegroups(\%curr_groups,$dom,$crs,$marker)) {	if (!&Apache::loncommon::coursegroups(\%curr_groups,$dom,$crs,$marker)) {
return &Apache::loncommon::simple_error_page($r,'',	&Apache::loncommon::simple_error_page($r,'','Invalid group name');
'Invalid group name');	return OK;
}	}
%groupinfo =	%groupinfo =
&Apache::loncommon::get_group_settings($curr_groups{$marker});	&Apache::loncommon::get_group_settings($curr_groups{$marker});
Line 83 sub handler {	Line 83 sub handler {
}	}

if (!$marker) {	if (!$marker) {
return &Apache::loncommon::simple_error_page($r,'','Invalid call');	&Apache::loncommon::simple_error_page($r,'','Invalid call');
	return OK;
}	}

# --------------------------------------------------------- The syllabus fields	# --------------------------------------------------------- The syllabus fields

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.36
changed lines
	Added in v.1.37