version 1.21, 2013/11/23 20:40:57
|
version 1.22, 2016/02/26 21:44:39
|
Line 33 use Apache::Constants qw(:common :http);
|
Line 33 use Apache::Constants qw(:common :http);
|
use Apache::loncommon(); |
use Apache::loncommon(); |
use Apache::lonnet; |
use Apache::lonnet; |
use Apache::lonuserstate(); |
use Apache::lonuserstate(); |
|
use Apache::longroup; |
|
use Apache::lonnavmaps; |
use LONCAPA::map(); |
use LONCAPA::map(); |
use Apache::lonlocal; |
use Apache::lonlocal; |
use LONCAPA; |
use LONCAPA; |
Line 257 sub boards_header {
|
Line 259 sub boards_header {
|
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) { |
|
&Apache::lonhtmlcommon::add_breadcrumb |
|
({href=>$grouppagelink, |
|
text=>"$ucgpterm: $description", |
|
title=>"Go to group's home page"}); |
|
} else { |
|
&Apache::lonhtmlcommon::add_breadcrumb |
|
({text=>"$ucgpterm: $description",}); |
|
} |
&Apache::lonhtmlcommon::add_breadcrumb |
&Apache::lonhtmlcommon::add_breadcrumb |
({href=>"/adm/$cdom/$cnum/$group/smppg?$refarg", |
({href=>"/adm/groupboards?group=$group&$refarg", |
text=>"$ucgpterm: $description", |
|
title=>"Go to group's home page"}, |
|
{href=>"/adm/groupboards?group=$group&$refarg", |
|
text=>"Discussion Boards", |
text=>"Discussion Boards", |
title=>"Display group discussion boards"},); |
title=>"Display group discussion boards"},); |
$output .= &Apache::lonhtmlcommon::breadcrumbs(&mt('[_1] discussion boards - [_2]',$gpterm,$description)); |
$output .= &Apache::lonhtmlcommon::breadcrumbs(&mt('[_1] discussion boards - [_2]',$gpterm,$description)); |