version 1.358.2.19.2.5, 2023/01/21 21:20:54
|
version 1.358.2.19.2.7, 2023/02/03 04:29:22
|
Line 1689 sub show_return_link {
|
Line 1689 sub show_return_link {
|
$env{'request.uri'}=~m{^/priv/}) { return 1; } |
$env{'request.uri'}=~m{^/priv/}) { return 1; } |
return if ($env{'request.noversionuri'} eq '/adm/supplemental'); |
return if ($env{'request.noversionuri'} eq '/adm/supplemental'); |
|
|
if (($env{'request.noversionuri'} =~ m{^/adm/(viewclasslist|navmaps)($|\?)}) |
if (($env{'request.noversionuri'} =~ m{^/adm/viewclasslist($|\?)}) |
|| ($env{'request.noversionuri'} =~ m{^/adm/.*/aboutme($|\?)})) { |
|| ($env{'request.noversionuri'} =~ m{^/adm/.*/aboutme($|\?)})) { |
|
|
return if ($env{'form.register'}); |
return if ($env{'form.register'}); |
Line 3473 sub jump_to_editres {
|
Line 3473 sub jump_to_editres {
|
if ($cfile =~ m{^/priv/($match_domain)/($match_username)/}) { |
if ($cfile =~ m{^/priv/($match_domain)/($match_username)/}) { |
my ($audom,$auname) = ($1,$2); |
my ($audom,$auname) = ($1,$2); |
unless (&Apache::lonnet::is_course($audom,$auname)) { |
unless (&Apache::lonnet::is_course($audom,$auname)) { |
unless ((&Apache::lonnet::will_trust('othcoau',$env{'user.domain'},$audom)) && |
|
(&Apache::lonnet::will_trust('coaurem',$audom,$env{'user.domain'}))) { |
|
return; |
|
} |
|
if (($symb ne '') && ($env{'request.course.id'}) && |
if (($symb ne '') && ($env{'request.course.id'}) && |
(&Apache::lonnet::allowed('mdc',$env{'request.course.id'}))) { |
(&Apache::lonnet::allowed('mdc',$env{'request.course.id'}))) { |
unless (&Apache::lonnet::can_switchserver($env{'user.domain'},$home)) { |
unless (&Apache::lonnet::can_switchserver($env{'user.domain'},$home)) { |