version 1.39, 2022/06/11 04:32:23
|
version 1.40, 2022/10/19 00:03:10
|
Line 78 sub real_handler {
|
Line 78 sub real_handler {
|
$r->send_http_header; |
$r->send_http_header; |
$r->print(&Apache::loncommon::check_release_result(@reinit)); |
$r->print(&Apache::loncommon::check_release_result(@reinit)); |
return OK; |
return OK; |
} elsif ($result eq 'update') { |
} |
my $cid = $env{'request.course.id'}; |
my ($cid,$cnum,$cdom); |
my $cnum = $env{'course.'.$cid.'.num'}; |
if ($result) { |
my $cdom = $env{'course.'.$cid.'.domain'}; |
$cid = $env{'request.course.id'}; |
|
$cnum = $env{'course.'.$cid.'.num'}; |
|
$cdom = $env{'course.'.$cid.'.domain'}; |
|
} |
|
if (($result eq 'main') || ($result eq 'both')) { |
&Apache::loncommon::content_type($r,'text/html'); |
&Apache::loncommon::content_type($r,'text/html'); |
$r->send_http_header; |
$r->send_http_header; |
&startpage($r); |
&startpage($r); |
Line 111 ENDCLOSE
|
Line 115 ENDCLOSE
|
return HTTP_NOT_ACCEPTABLE; |
return HTTP_NOT_ACCEPTABLE; |
} |
} |
} |
} |
|
if (($result eq 'both') || ($result eq 'supp')) { |
|
my $possdel; |
|
if ($result eq 'supp') { |
|
$possdel = 1; |
|
} |
|
my ($supplemental,$refs_updated) = &Apache::lonnet::get_supplemental($cnum,$cdom,'',$possdel); |
|
unless ($refs_updated) { |
|
&Apache::loncommon::set_supp_httprefs($cnum,$cdom,$supplemental,$possdel); |
|
} |
|
} |
|
|
my $course_type = &Apache::loncommon::course_type(); |
my $course_type = &Apache::loncommon::course_type(); |
if (($course_type eq 'Placement') && (!$env{'request.role.adv'})) { |
if (($course_type eq 'Placement') && (!$env{'request.role.adv'})) { |
Line 370 sub startContentScreen {
|
Line 384 sub startContentScreen {
|
|
|
$r->print("\n".'<ul class="LC_TabContentBigger" id="mainnav">'."\n"); |
$r->print("\n".'<ul class="LC_TabContentBigger" id="mainnav">'."\n"); |
$r->print('<li'.(($mode eq 'navmaps')?' class="active"':'').'><a href="/adm/navmaps"><b> '.&mt('Main Content').' </b></a></li>'."\n"); |
$r->print('<li'.(($mode eq 'navmaps')?' class="active"':'').'><a href="/adm/navmaps"><b> '.&mt('Main Content').' </b></a></li>'."\n"); |
my $allowed = &Apache::lonnet::allowed('mdc',$env{'request.course.id'}); |
my $supptab; |
my ($suppcount,$errors); |
if ($env{'request.role.adv'}) { |
unless ($allowed) { |
$supptab = 1; |
|
} else { |
my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'}; |
my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'}; |
my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'}; |
my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'}; |
($suppcount,$errors) = &Apache::lonnet::get_numsuppfiles($cnum,$cdom); |
$supptab = &Apache::lonnet::has_unhidden_suppfiles($cnum,$cdom); |
} |
} |
if ($allowed || $suppcount) { |
if ($supptab) { |
$r->print('<li '.(($mode eq 'supplemental')?' class="active"':'').'><a href="/adm/supplemental"><b>'.&mt('Supplemental Content').'</b></a></li>'); |
$r->print('<li '.(($mode eq 'supplemental')?' class="active"':'').'><a href="/adm/supplemental"><b>'.&mt('Supplemental Content').'</b></a></li>'); |
} |
} |
$r->print('<li'.(($mode eq 'coursesearch')?' class="active"':'').'><a href="/adm/searchcourse"><b> '.&mt('Content Search').' </b></a></li>'."\n"); |
$r->print('<li'.(($mode eq 'coursesearch')?' class="active"':'').'><a href="/adm/searchcourse"><b> '.&mt('Content Search').' </b></a></li>'."\n"); |