version 1.186, 2006/06/27 18:16:03
|
version 1.189, 2006/06/30 02:14:58
|
Line 63 sub initlittle {
|
Line 63 sub initlittle {
|
'docs' => 'Course Documents', |
'docs' => 'Course Documents', |
'exit' => 'Exit', |
'exit' => 'Exit', |
'launch' => 'Launch Remote Control', |
'launch' => 'Launch Remote Control', |
'groups' => 'Course Groups', |
'groups' => 'Groups', |
'gdoc' => 'Group Documents', |
'gdoc' => 'Group Documents', |
'teams' => 'Teams', |
'teams' => 'Teams', |
); |
); |
Line 100 sub menubuttons {
|
Line 100 sub menubuttons {
|
} |
} |
if ($env{'request.course.id'}) { |
if ($env{'request.course.id'}) { |
my %coursegroups; |
my %coursegroups; |
my $viewgrps_permission = |
my $viewgrps_permission = |
&Apache::lonnet::allowed('vcg',$env{'request.course.id'}); |
&Apache::lonnet::allowed('vcg',$env{'request.course.id'}); |
if (!$viewgrps_permission) { |
if (!$viewgrps_permission) { |
%coursegroups = &Apache::lonnet::get_active_groups($env{'user.domain'},$env{'user.name'},$env{'course.'.$env{'request.course.id'}.'.domain'}, $env{'course.'.$env{'request.course.id'}.'.num'}); |
%coursegroups = &Apache::lonnet::get_active_groups($env{'user.domain'},$env{'user.name'},$env{'course.'.$env{'request.course.id'}.'.domain'}, $env{'course.'.$env{'request.course.id'}.'.num'}); |
} |
} |
if ((keys(%coursegroups) > 0) || ($viewgrps_permission)) { |
if ((keys(%coursegroups) > 0) || ($viewgrps_permission)) { |
$showgroups = 1; |
$showgroups = 1; |
} |
} |
Line 175 ENDMAINMENU
|
Line 175 ENDMAINMENU
|
<td> |
<td> |
<a href="/adm/logout" target="_top">$lt{'exit'}</a> |
<a href="/adm/logout" target="_top">$lt{'exit'}</a> |
</td> |
</td> |
<td "LC_top_nav_logo"> |
<td class="LC_top_nav_logo">LON-CAPA<img src="$logo" alt="Logo" /></td> |
<img align="right" src="$logo" alt="Logo" /> |
</tr> |
<b>LON-CAPA</b> |
|
</td> |
|
</tr> |
|
</table> |
</table> |
</font> |
</font> |
ENDINLINEMENU |
ENDINLINEMENU |
Line 202 my $is_group = (&Apache::loncommon::cour
|
Line 199 my $is_group = (&Apache::loncommon::cour
|
ENDDOCS |
ENDDOCS |
} |
} |
if ($showgroups) { |
if ($showgroups) { |
my $text = ($is_group) ? $lt{'groups'} : $lt{'teams'}; |
my $text = ($is_group) ? $lt{'teams'} : $lt{'groups'}; |
$groups =(<<ENDGROUPS); |
$groups =(<<ENDGROUPS); |
<td><a href="/adm/coursegroups" target="_top">$text</a></td> |
<td><a href="/adm/coursegroups" target="_top">$text</a></td> |
ENDGROUPS |
ENDGROUPS |
Line 257 $groups
|
Line 254 $groups
|
$remote |
$remote |
<td><a href="/adm/roles" target="_top">$lt{'roles'}</a></td> |
<td><a href="/adm/roles" target="_top">$lt{'roles'}</a></td> |
<td><a href="/adm/logout" target="_top">$lt{'exit'}</a></td> |
<td><a href="/adm/logout" target="_top">$lt{'exit'}</a></td> |
<td class="LC_top_nav_logo"><img align="right" src="$logo" alt="Logo" /><b>LON-CAPA</b></td> |
<td class="LC_top_nav_logo">LON-CAPA<img src="$logo" alt="Logo" /></td> |
</tr> |
</tr> |
</table> |
</table> |
$form |
$form |