loncom/interface/lontrackstudent.pm - diff

Return to lontrackstudent.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.30.2.1, 2010/01/06 18:23:27	version 1.31, 2010/05/03 16:41:51
Line 525 sub handler {	Line 525 sub handler {
my $r=shift;	my $r=shift;
my $c = $r->connection();	my $c = $r->connection();
#	#
# Check for overloading here and on the course home server
my $loaderror=&Apache::lonnet::overloaderror($r);
if ($loaderror) { return $loaderror; }
$loaderror=
&Apache::lonnet::overloaderror
($r,
$env{'course.'.$env{'request.course.id'}.'.home'});
if ($loaderror) { return $loaderror; }
#
# Check for access	# Check for access
if (! &Apache::lonnet::allowed('vsa',$env{'request.course.id'})) {	if (! &Apache::lonnet::allowed('vsa',$env{'request.course.id'})) {
$env{'user.error.msg'}=	$env{'user.error.msg'}=
Line 553 sub handler {	Line 544 sub handler {
&Apache::loncommon::content_type($r,'text/html');	&Apache::loncommon::content_type($r,'text/html');
$r->send_http_header;	$r->send_http_header;
if ($r->header_only) { return OK; }	if ($r->header_only) { return OK; }

if (&Apache::loncommon::needs_gci_custom()) {
$r->print(&Apache::loncommon::start_page("Student Activity"));
$r->print('<h3>'.
&mt('No student activity display available for Concept Tests') .
'</h3>');
$r->print(&Apache::loncommon::end_page());
return OK;
}

#	#
# Extract form elements from query string	# Extract form elements from query string
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},	&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},