rat/lonuserstate.pm - diff

Return to lonuserstate.pm CVS log

Up to [LON-CAPA] / rat

version 1.149.2.2.2.1, 2020/01/16 21:49:07	version 1.149.2.3, 2020/03/05 22:39:57
Line 469 sub parse_resource {	Line 469 sub parse_resource {
# is not a page. If the resource is a page then it must be	# is not a page. If the resource is a page then it must be
# assembled (at fetch time?).	# assembled (at fetch time?).

unless ($ispage) {	if ($ispage) {
	if ($token->[2]->{'external'} eq 'true') { # external
	$turi=~s{^http\://}{/ext/};
	}
	} else {
$turi=~/\.(\w+)$/;	$turi=~/\.(\w+)$/;
my $embstyle=&Apache::loncommon::fileembstyle($1);	my $embstyle=&Apache::loncommon::fileembstyle($1);
if ($token->[2]->{'external'} eq 'true') { # external	if ($token->[2]->{'external'} eq 'true') { # external
Line 484 sub parse_resource {	Line 488 sub parse_resource {
} elsif ($turi!~/\.(sequence\|page)$/) {	} elsif ($turi!~/\.(sequence\|page)$/) {
$turi='/adm/coursedocs/showdoc'.$turi;	$turi='/adm/coursedocs/showdoc'.$turi;
}	}
} elsif ($turi=~ m{^/adm/$match_domain/$match_courseid/\d+/ext\.tool$}) {
$turi='/adm/wrapper'.$turi;
} elsif ($turi=~/\S/) { # normal non-empty internal resource	} elsif ($turi=~/\S/) { # normal non-empty internal resource
my $mapdir=$uri;	my $mapdir=$uri;
$mapdir=~s/[^\/]+$//;	$mapdir=~s/[^\/]+$//;