version 1.41, 2006/05/18 17:12:58
|
version 1.42, 2006/06/30 18:06:47
|
Line 129 sub handler {
|
Line 129 sub handler {
|
if ($caller eq 'grppg') { |
if ($caller eq 'grppg') { |
if (($grp_view_permission) || |
if (($grp_view_permission) || |
(&Apache::longroup::check_group_access($caller))) { |
(&Apache::longroup::check_group_access($caller))) { |
unless(&Apache::lonnet::allowed('vgh', |
if ((!&Apache::lonnet::allowed('vgh', |
$env{'request.course.id'}.'/'.$marker)) { |
$env{'request.course.id'}.'/'.$marker)) |
|
&& (!&Apache::lonnet::allowed('mdg', |
|
$env{'request.course.id'}.'/'.$marker))) { |
&display_group_links($r,$target,$marker,'view',%groupinfo); |
&display_group_links($r,$target,$marker,'view',%groupinfo); |
return OK; |
return OK; |
} |
} |
Line 149 sub handler {
|
Line 151 sub handler {
|
|
|
my $allowed; |
my $allowed; |
if ($caller eq 'grppg') { |
if ($caller eq 'grppg') { |
$allowed = $grp_view_permission; |
$allowed = &Apache::lonnet::allowed('mdg',$env{'request.course.id'}); |
unless ($allowed) { |
if (!$allowed) { |
$allowed = &Apache::lonnet::allowed('mgh',$env{'request.course.id'}. |
$allowed = &Apache::lonnet::allowed('mgh',$env{'request.course.id'}. |
'/'.$marker); |
'/'.$marker); |
} |
} |