version 1.20, 2018/04/14 02:29:51
|
version 1.21, 2018/04/17 14:02:56
|
Line 49 sub handler {
|
Line 49 sub handler {
|
} |
} |
my ($map,$resid,$url) = split(/___/,$realuri); |
my ($map,$resid,$url) = split(/___/,$realuri); |
$realuri = &Apache::lonnet::clutter($url).'?symb='.$realuri; |
$realuri = &Apache::lonnet::clutter($url).'?symb='.$realuri; |
|
} elsif ($realuri =~ m{^res/$match_domain/$match_username/.+\.(?:sequence|page)___\d+___.+$}) { |
|
if ($user{'ltiuri'} ne $realuri) { |
|
&Apache::lonnet::appenv({'request.lti.uri' => $realuri}); |
|
} |
|
my ($map,$resid,$url) = split(/___/,$realuri); |
|
$realuri = &Apache::lonnet::clutter($url).'?symb='.$realuri; |
} elsif ($realuri =~ m{^tiny/$match_domain/\w+$}) { |
} elsif ($realuri =~ m{^tiny/$match_domain/\w+$}) { |
$realuri = '/'.$realuri; |
$realuri = '/'.$realuri; |
if ($user{'ltiuri'} ne $realuri) { |
if ($user{'ltiuri'} ne $realuri) { |
Line 66 sub handler {
|
Line 72 sub handler {
|
&Apache::lonnet::appenv({'request.lti.uri' => $realuri}); |
&Apache::lonnet::appenv({'request.lti.uri' => $realuri}); |
} |
} |
$realuri .= (($realuri =~/\?/)?'&':'?').'navmap=1'; |
$realuri .= (($realuri =~/\?/)?'&':'?').'navmap=1'; |
|
} elsif ($realuri =~ m{^/res/.+\.sequence$}) { |
|
if ($user{'ltiuri'} ne $realuri) { |
|
&Apache::lonnet::appenv({'request.lti.uri' => $realuri}); |
|
} |
|
$realuri .= (($realuri =~/\?/)?'&':'?').'navmap=1'; |
|
} elsif ($realuri =~ m{\.page$}) { |
|
if ($user{'ltiuri'} ne $realuri) { |
|
&Apache::lonnet::appenv({'request.lti.uri' => $realuri}); |
|
} |
} |
} |
} |
} |
my $host = $r->headers_in->get('Host'); |
my $host = $r->headers_in->get('Host'); |