loncom/interface/lonbulletin.pm - diff

Return to lonbulletin.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.32, 2006/03/21 20:31:08	version 1.34, 2006/03/21 21:01:22
Line 50 sub handler {	Line 50 sub handler {
my (undef,undef,undef,undef,$marker)=split(/\//,$r->uri);	my (undef,undef,undef,undef,$marker)=split(/\//,$r->uri);
# Is this even in a course?	# Is this even in a course?
if (!$env{'request.course.id'}) {	if (!$env{'request.course.id'}) {
$r->print(&Apache::loncommon::start_page('Not in a course').	&Apache::loncommon::simple_error_page($r,'Not in a course',
&mt('Not in a course').	'Not in a course');
&Apache::loncommon::end_page());
return OK;	return OK;
}	}

$marker=~s/\D//g;	$marker=~s/\D//g;

if (!$marker) {	if (!$marker) {
$r->print(&Apache::loncommon::start_page('Invalid Call').	&Apache::loncommon::simple_error_page($r,'Invalid Call',
&mt('Invalid Call').	'Invalid Call');
&Apache::loncommon::end_page());
return OK;	return OK;
}	}

Line 104 sub handler {	Line 102 sub handler {
&Apache::loncommon::start_page("Bulletin Board/Discussion",undef,	&Apache::loncommon::start_page("Bulletin Board/Discussion",undef,
{'function' => $forcestudent,	{'function' => $forcestudent,
'add_entries' => $addentries,	'add_entries' => $addentries,
'domain' => $domain,	'domain' => $dom,
'force_register' =>	'force_register' =>
$env{'form.register'}});	$env{'form.register'}});
$r->print($start_page);	$r->print($start_page);