loncom/interface/lonwhatsnew.pm - diff

Return to lonwhatsnew.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.42, 2005/12/22 03:39:39	version 1.43, 2006/01/06 21:04:34
Line 60 sub handler {	Line 60 sub handler {

&Apache::loncommon::content_type($r,'text/html');	&Apache::loncommon::content_type($r,'text/html');
$r->send_http_header;	$r->send_http_header;
my $crsid = $env{'request.course.id'};
$crsid =~ s/_/\//;	if ( ! $env{'request.course.fn'}
if ((!($env{'request.course.fn'})) \|\|	\|\|
(!(&Apache::lonnet::allowed('whn',	(!( &Apache::lonnet::allowed('whn',$env{'request.course.id'})
$env{'request.course.id'})))) {	\|\| &Apache::lonnet::allowed('whn',$env{'request.course.id'}
# Not in a course, or no role in course	.'/'.$env{'request.course.sec'})))) {
	# Not in a course, or no whn priv in course
$env{'user.error.msg'}="/adm/whatsnew::whn:0:0:Cannot display what's new page";	$env{'user.error.msg'}="/adm/whatsnew::whn:0:0:Cannot display what's new page";
return HTTP_NOT_ACCEPTABLE;	return HTTP_NOT_ACCEPTABLE;
}	}