version 1.127.2.1, 2017/03/19 17:59:15
|
version 1.127.2.3, 2020/09/09 00:23:50
|
Line 335 END
|
Line 335 END
|
$link = '<a href="'.&HTML::Entities::encode($actionlinks{$action}.$group,'<>&"'). |
$link = '<a href="'.&HTML::Entities::encode($actionlinks{$action}.$group,'<>&"'). |
'">'.$lt{$action}.'</a>'; |
'">'.$lt{$action}.'</a>'; |
} else { |
} else { |
$link = |
$link = |
&Apache::longroup::get_group_link($cdom,$cnum,$group,$navmap); |
&Apache::longroup::get_group_link($cdom,$cnum,$group,$navmap, |
|
$view_permission); |
if ($link) { |
if ($link) { |
$link = '<a href="'.$link; |
$link = '<a href="'.$link; |
$link .= (($link=~/\?/)?'&':'?').'ref=grouplist'; |
$link .= (($link=~/\?/)?'&':'?').'ref=grouplist'; |
Line 400 END
|
Line 401 END
|
} else { |
} else { |
my @coursegroups = split(/:/,$env{'request.course.groups'}); |
my @coursegroups = split(/:/,$env{'request.course.groups'}); |
if (@coursegroups > 0) { |
if (@coursegroups > 0) { |
|
my $numlinks = 0; |
$r->print('<br /><br />'); |
$r->print('<br /><br />'); |
my %curr_groups = &Apache::longroup::coursegroups($cdom,$cnum); |
my %curr_groups = &Apache::longroup::coursegroups($cdom,$cnum); |
if (%curr_groups) { |
if (%curr_groups) { |
Line 416 END
|
Line 418 END
|
$curr_groups{$group}); |
$curr_groups{$group}); |
my $description = &unescape( |
my $description = &unescape( |
$group_info{description}); |
$group_info{description}); |
my $link = |
my ($link,$hidden) = |
&Apache::longroup::get_group_link($cdom,$cnum,$group,$navmap). |
&Apache::longroup::get_group_link($cdom,$cnum,$group,$navmap, |
'&ref=grouplist'; |
$view_permission); |
$r->print('<span style="font-size: larger"><a href="'.$link.'">'.$group,'</a></span><br /><small>'.$description.'</small><br /><br />'); |
if ($link) { |
|
$link .= '&ref=grouplist'; |
|
$r->print('<span style="font-size: larger"><a href="'.$link.'">'. |
|
$description.'</a></span><br /><br />'); |
|
$numlinks ++; |
|
} elsif ($hidden) { |
|
my $numtools = 0; |
|
my $refarg = '&ref=grouplist'; |
|
my $output = |
|
&Apache::longroup::display_group_links($r,$env{'form.grade_target'},$group,'view', |
|
$refarg,\$numtools,$hidden,%group_info); |
|
if ($numtools) { |
|
$r->print('<span style="font-size: larger">'.$description.'</a></span>'. |
|
'<br />'.$output.'<br /><br />'); |
|
$numlinks ++; |
|
} |
|
} |
} |
} |
} |
} |
|
if (!$numlinks) { |
|
$r->print( |
|
'<p class="LC_info">' |
|
.&mt('You do not currently have access to any '.$gpterm.'s' |
|
.' in this '.lc($crstype).'.') |
|
.'</p>' |
|
); |
|
} |
} else { |
} else { |
$r->print( |
$r->print( |
'<p class="LC_info">' |
'<p class="LC_info">' |
Line 915 function changeSort(caller) {
|
Line 941 function changeSort(caller) {
|
if ($env{'form.refpage'} eq 'grouplist') { |
if ($env{'form.refpage'} eq 'grouplist') { |
&Apache::lonhtmlcommon::add_breadcrumb |
&Apache::lonhtmlcommon::add_breadcrumb |
({href=>"/adm/$cdom/$cnum/$env{'form.groupname'}/smppg?ref=grouplist", |
({href=>"/adm/$cdom/$cnum/$env{'form.groupname'}/smppg?ref=grouplist", |
text=>"Group: $description",}); |
text=>&mt('Group').": $description", |
|
no_mt=>1}); |
} |
} |
} |
} |
|
|