|
version 1.240.2.9, 2010/01/15 05:30:21
|
version 1.240.2.10, 2010/01/16 15:06:22
|
|
Line 735 ENDHEADER
|
Line 735 ENDHEADER
|
| my $numcourses = keys(%courses); |
my $numcourses = keys(%courses); |
| my $switcher; |
my $switcher; |
| if ($numcourses > 0) { |
if ($numcourses > 0) { |
| $switcher = &Apache::lonmainmenu::gcitest_switcher(%courses); |
$switcher = &Apache::lonmainmenu::gcitest_switcher('cc',%courses); |
| my $current; |
my $current; |
| if ($env{'request.course.id'}) { |
if ($env{'request.course.id'}) { |
| $current = 'cc./'.$env{'course.'.$env{'request.course.id'}.'.domain'}. |
$current = 'cc./'.$env{'course.'.$env{'request.course.id'}.'.domain'}. |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonroles.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / auth