loncom/interface/lonbulletin.pm - diff

Return to lonbulletin.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.67, 2013/09/17 15:04:30	version 1.68, 2016/02/26 21:44:39
Line 37 use Apache::lonfeedback;	Line 37 use Apache::lonfeedback;
use Apache::lonhtmlgateway;	use Apache::lonhtmlgateway;
use Apache::lonlocal;	use Apache::lonlocal;
use Apache::lonhtmlcommon;	use Apache::lonhtmlcommon;
	use Apache::longroup;
	use Apache::lonnavmaps;
use HTML::Entities();	use HTML::Entities();
use LONCAPA;	use LONCAPA;

Line 314 sub groupboard_breadcrumbs {	Line 316 sub groupboard_breadcrumbs {
text=>"Groups",	text=>"Groups",
title=>"View course groups"});	title=>"View course groups"});
}	}
	my $view_permission =
	&Apache::lonnet::allowed('vcg',$env{'request.course.id'}.($env{'request.course.sec'}?'/'.$env{'request.course.sec'}:''));
	my $navmap=Apache::lonnavmaps::navmap->new();
	my $grouppagelink = &Apache::longroup::get_group_link($cdom,$cnum,$group,$navmap,$view_permission,$refarg);
	if ($grouppagelink) {
	push(@{$brcrum},
	{href=>$grouppagelink,
	text=>"$ucgpterm: $description",
	title=>"Go to group's home page"},
	);
	} else {
	push(@{$brcrum},
	{text=>"$ucgpterm: $description",}
	);
	}
push(@{$brcrum},	push(@{$brcrum},
{href=>"/adm/$cdom/$cnum/$group/smppg?$refarg",
text=>"$ucgpterm: $description",
title=>"Go to group's home page"},
{href=>"/adm/groupboards?group=$group&$refarg",	{href=>"/adm/groupboards?group=$group&$refarg",
text=>"Discussion Boards",	text=>"Discussion Boards",
title=>"Display group discussion boards"},	title=>"Display group discussion boards"},