|
version 1.450, 2016/06/02 01:43:46
|
version 1.451, 2016/06/19 04:27:50
|
|
Line 812 sub innerregister {
|
Line 812 sub innerregister {
|
| if ($currdir =~ m-/$-) { |
if ($currdir =~ m-/$-) { |
| $is_const_dir = 1; |
$is_const_dir = 1; |
| if ($thisdisfn eq '') { |
if ($thisdisfn eq '') { |
| $is_const_dir = 2; |
unless (($env{'request.course.id'}) && |
| |
($env{'course.'.$env{'request.course.id'}.'.num'} eq $uname) && |
| |
($env{'course.'.$env{'request.course.id'}.'.domain'} eq $udom)) { |
| |
$is_const_dir = 2; |
| |
} |
| } |
} |
| } else { |
} else { |
| $currdir =~ s|[^/]+$||; |
$currdir =~ s|[^/]+$||; |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonmenu.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface