version 1.369.2.83.2.13, 2023/12/29 19:53:25
|
version 1.369.2.83.2.14, 2024/01/02 03:46:06
|
Line 370 sub primary_menu {
|
Line 370 sub primary_menu {
|
($item->[2] eq 'blog')) && |
($item->[2] eq 'blog')) && |
(!&Apache::lonnet::usertools_access('','',$item->[2], |
(!&Apache::lonnet::usertools_access('','',$item->[2], |
undef,'tools'))); |
undef,'tools'))); |
if ($item->[2] eq 'browsepub') { |
if (($item->[2] eq 'browsepub') && ($item->[0] eq '/res/')) { |
if ($env{'request.role'} =~ /^au\./) { |
if ($env{'request.role'} =~ /^au\./) { |
$item->[0] = '/res/'.$env{'request.role.domain'}.'/?launch=1'; |
$item->[0] .= $env{'request.role.domain'}.'/?launch=1'; |
} elsif ($env{'request.role'} =~ /^ca\./($match_domain)/($match_user)$/) { |
} elsif ($env{'request.role'} =~ m{^ca\./($match_domain)/($match_username)$}) { |
$item->[0] = '/res/'.$1.'/'.$2.'/?launch=1'; |
$item->[0] .= $1.'/'.$2.'/?launch=1'; |
} elsif (&Apache::lonnet::allowed('bre',$env{'user.domain'})) { |
} elsif (&Apache::lonnet::allowed('bre',$env{'user.domain'})) { |
$item->[0] = '/res/'.$env{'user.domain'}.'/?launch=1'; |
$item->[0] .= $env{'user.domain'}.'/?launch=1'; |
} elsif (&Apache::lonnet::allowed('bro','/res/')) { |
} elsif (&Apache::lonnet::allowed('bro','/res/')) { |
$item->[0] = '/res/?launch=1'; |
$item->[0] .= '?launch=1'; |
} else { |
} else { |
next; |
next; |
} |
} |