|
version 1.51, 2016/02/22 03:36:52
|
version 1.52, 2016/10/31 12:59:11
|
|
Line 56 sub wrapper {
|
Line 56 sub wrapper {
|
| my $anchor; |
my $anchor; |
| if (($is_ext) && ($env{'form.symb'})) { |
if (($is_ext) && ($env{'form.symb'})) { |
| (undef,undef,my $res) = &Apache::lonnet::decode_symb($env{'form.symb'}); |
(undef,undef,my $res) = &Apache::lonnet::decode_symb($env{'form.symb'}); |
| if ($res =~ /(\#.+)$/) { |
if ($res =~ /(#[^#]+)$/) { |
| $anchor = $1; |
$anchor = $1; |
| } |
} |
| } |
} |
|
Line 181 sub handler {
|
Line 181 sub handler {
|
| (&Apache::lonnet::allowed('mdc',$env{'request.course.id'})) && |
(&Apache::lonnet::allowed('mdc',$env{'request.course.id'})) && |
| (($env{'form.folderpath'} =~ /^supplemental/) || |
(($env{'form.folderpath'} =~ /^supplemental/) || |
| ($env{'form.symb'} =~ /^uploaded/))) { |
($env{'form.symb'} =~ /^uploaded/))) { |
| |
(undef,undef,my $res) = &Apache::lonnet::decode_symb($env{'form.symb'}); |
| |
if ($res =~ /(#[^#]+)$/) { |
| |
$url .= $1; |
| |
} |
| my $type = 'ext'; |
my $type = 'ext'; |
| my %ltitools; |
my %ltitools; |
| if ($exttool) { |
if ($exttool) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonwrapper.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / rat