version 1.51, 2019/01/16 20:23:42
|
version 1.59, 2022/10/29 18:13:29
|
Line 234 sub handler {
|
Line 234 sub 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 $cnum = $env{'course.'.$env{'request.course.id'}.'.num'}; |
my ($cnum,$cdom); |
my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'}; |
if ($result) { |
|
$cnum = $env{'course.'.$env{'request.course.id'}.'.num'}; |
|
$cdom = $env{'course.'.$env{'request.course.id'}.'.domain'}; |
|
} |
|
if (($result eq 'main') || ($result eq 'both')) { |
my ($furl,$ferr) = &Apache::lonuserstate::readmap("$cdom/$cnum"); |
my ($furl,$ferr) = &Apache::lonuserstate::readmap("$cdom/$cnum"); |
if ($ferr) { |
if ($ferr) { |
my $requrl = $r->uri; |
my $requrl = $r->uri; |
Line 245 sub handler {
|
Line 249 sub handler {
|
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::loncommon::get_supplemental($cnum,$cdom,'',$possdel); |
|
unless ($refs_updated) { |
|
&Apache::loncommon::set_supp_httprefs($cnum,$cdom,$supplemental,$possdel); |
|
} |
|
} |
&Apache::loncommon::content_type($r,'text/html'); |
&Apache::loncommon::content_type($r,'text/html'); |
$r->send_http_header; |
$r->send_http_header; |
|
|
Line 291 sub handler {
|
Line 304 sub handler {
|
} |
} |
push(@crumbs,{text => $maptitle, no_mt => 1}); |
push(@crumbs,{text => $maptitle, no_mt => 1}); |
$args = {'bread_crumbs' => \@crumbs, |
$args = {'bread_crumbs' => \@crumbs, |
'bread_crumbs_nomenu' => 1}; |
'bread_crumbs_nomenu' => 1, |
|
'no_auto_mt_title' => 1}; |
$r->print(&Apache::loncommon::start_page($maptitle,undef,$args)); |
$r->print(&Apache::loncommon::start_page($maptitle,undef,$args)); |
|
|
my $renderArgs = { 'cols' => [0,1,2,3], |
my $renderArgs = { 'cols' => [0,1,2,3], |
Line 374 sub handler {
|
Line 388 sub handler {
|
$dismapid=(split(/\./,$disid))[1]; |
$dismapid=(split(/\./,$disid))[1]; |
if (!$env{'request.role.adv'}) { |
if (!$env{'request.role.adv'}) { |
$randomout = $bighash{'randomout_'.$disid}; |
$randomout = $bighash{'randomout_'.$disid}; |
} |
|
if (!$env{'request.role.adv'}) { |
|
$is_encrypted = $bighash{'encrypted_'.$disid}; |
$is_encrypted = $bighash{'encrypted_'.$disid}; |
} |
} |
} elsif (tie(%hash,'GDBM_File',$env{'request.course.fn'}.'_symb.db', |
} elsif (tie(%hash,'GDBM_File',$env{'request.course.fn'}.'_symb.db', |
Line 396 sub handler {
|
Line 408 sub handler {
|
$dismapid=(split(/\./,$disid))[1]; |
$dismapid=(split(/\./,$disid))[1]; |
if (!$env{'request.role.adv'}) { |
if (!$env{'request.role.adv'}) { |
$randomout = $bighash{'randomout_'.$disid}; |
$randomout = $bighash{'randomout_'.$disid}; |
} |
|
if (!$env{'request.role.adv'}) { |
|
$is_encrypted = $bighash{'encrypted_'.$disid}; |
$is_encrypted = $bighash{'encrypted_'.$disid}; |
} |
} |
} |
} |
Line 417 sub handler {
|
Line 427 sub handler {
|
if ($is_encrypted) { |
if ($is_encrypted) { |
$showdisurl = &Apache::lonenc::encrypted($disurl); |
$showdisurl = &Apache::lonenc::encrypted($disurl); |
} |
} |
&Apache::lonnet::symblist($requrl,$disurl => [$disurl,$dismapid], |
if ($disurl =~ m{^/adm/navmaps(\?|$)}) { |
'last_known' => [$disurl,$dismapid]); |
&Apache::lonnet::symblist($requrl,$disurl => [$disurl,$dismapid]); |
|
} else { |
|
&Apache::lonnet::symblist($requrl,$disurl => [$disurl,$dismapid], |
|
'last_known' => [$disurl,$dismapid]); |
|
} |
&Apache::loncommon::content_type($r,'text/html'); |
&Apache::loncommon::content_type($r,'text/html'); |
$r->header_out(Location => &Apache::lonnet::absolute_url($ENV{'SERVER_NAME'}). |
$r->header_out(Location => &Apache::lonnet::absolute_url(). |
$showdisurl); |
$showdisurl); |
return REDIRECT; |
return REDIRECT; |
} else { |
} else { |