rat/lonuserstate.pm - diff

Return to lonuserstate.pm CVS log

Up to [LON-CAPA] / rat

version 1.149.2.1, 2018/03/29 20:10:47	version 1.150, 2016/01/26 14:30:40
Line 42 use Safe::Hole;	Line 42 use Safe::Hole;
use Opcode;	use Opcode;
use Apache::lonenc;	use Apache::lonenc;
use Fcntl qw(:flock);	use Fcntl qw(:flock);
use LONCAPA;	use LONCAPA qw(:DEFAULT :match);
use File::Basename;	use File::Basename;


Line 475 sub parse_resource {	Line 475 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+/exttools?$}) {
	$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/[^\/]+$//;
Line 1174 sub readmap {	Line 1176 sub readmap {
&unlink_tmpfiles($fn);	&unlink_tmpfiles($fn);
}	}
undef %randompick;	undef %randompick;
undef %randompickseed;
undef %randomorder;
undef %hiddenurl;	undef %hiddenurl;
undef %encurl;	undef %encurl;
$retfrid='';	$retfrid='';
Line 1319 sub readmap {	Line 1319 sub readmap {
$lock=1;	$lock=1;
}	}
undef %randompick;	undef %randompick;
undef %randompickseed;
undef %randomorder;
undef %hiddenurl;	undef %hiddenurl;
undef %encurl;	undef %encurl;
$errtext='';	$errtext='';