--- loncom/interface/grouproster.pm 2008/12/06 20:31:14 1.6
+++ loncom/interface/grouproster.pm 2020/09/08 23:54:40 1.11
@@ -1,6 +1,6 @@
# The LearningOnline Network with CAPA
#
-# $Id
+# $Id: grouproster.pm,v 1.11 2020/09/08 23:54:40 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -33,6 +33,7 @@ use Apache::loncommon;
use Apache::lonhtmlcommon;
use Apache::lonlocal;
use Apache::longroup;
+use Apache::lonnavmaps;
use LONCAPA;
use Apache::Constants qw(:common :http);
use lib '/home/httpd/lib/perl/';
@@ -141,10 +142,7 @@ sub roster_header {
}
my $args;
if ($env{'form.ref'} eq 'popup') {
- $args = {
- 'no_nav_bar' => 1,
- 'no_inline_link' => 1,
- };
+ $args = { 'no_nav_bar' => 1, };
}
my $jscript = qq|
function changeSort(caller) {
@@ -160,14 +158,27 @@ function changeSort(caller) {
$output .= '
'.&mt('Group membership status - [_1]',$description).
'
';
} else {
+ 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=>&mt('Group').": $description",
+ title=>&mt("Go to group's home page"),
+ no_mt=>1},);
+ } else {
+ &Apache::lonhtmlcommon::add_breadcrumb
+ ({text=>&mt('Group').": $description",
+ no_mt=>1});
+ }
&Apache::lonhtmlcommon::add_breadcrumb
- ({href=>"/adm/$cdom/$cnum/$group/smppg?$refarg",
- text=>"$ucgpterm: $description",
- title=>"Go to group's home page"},
- {href=>'/adm/grouproster?group='.$group.'&'.$refarg,
+ ({href=>'/adm/grouproster?group='.$group.'&'.$refarg,
text=>"Membership Roster",
title=>"Display group membership"},);
- $output .= &Apache::lonhtmlcommon::breadcrumbs(&mt($gpterm.' membership status - [_1]',$description));
+ $output .= &Apache::lonhtmlcommon::breadcrumbs(&mt('Group membership status - [_1]',$description),
+ undef,undef,undef,undef,1);
}
return $output;
}
@@ -350,8 +361,8 @@ sub members_table_row {
$privlist =~ s/, $//;
$output .= ''.$privlist.' | ';
} elsif ($view_details) {
- $output .= ''.join(' ',
- @{$$userinfo{'currtools'}}).' | ';
+ $output .= ''.join(' ',
+ @{$$userinfo{'currtools'}}).' | ';
}
}
$output .= &Apache::loncommon::end_data_table_row();