version 1.240.2.19, 2010/12/05 16:15:02
|
version 1.240.2.20, 2010/12/05 16:31:53
|
Line 755 ENDHEADER
|
Line 755 ENDHEADER
|
my $switcher; |
my $switcher; |
if ($numcourses > 0) { |
if ($numcourses > 0) { |
$switcher = &Apache::loncommon::gcitest_switcher('cc',%courses); |
$switcher = &Apache::loncommon::gcitest_switcher('cc',%courses); |
my $current; |
|
if ($env{'request.course.id'}) { |
|
$current = 'cc./'.$env{'course.'.$env{'request.course.id'}.'.domain'}. |
|
'/'.$env{'course.'.$env{'request.course.id'}.'.num'}; |
|
} |
|
} |
} |
$r->print(&Apache::lonmenu::inlinemenu('gcicustom',$switcher). |
$r->print(&Apache::lonmenu::inlinemenu('gcicustom',$switcher). |
&Apache::loncommon::end_page()); |
&Apache::loncommon::end_page()); |