rat/lonuserstate.pm - diff

Return to lonuserstate.pm CVS log

Up to [LON-CAPA] / rat

version 1.141, 2011/08/18 04:17:07	version 1.143, 2012/07/21 21:08:56
Line 297 sub loadmap {	Line 297 sub loadmap {
# processing the randomorder parameter if it is set, not	# processing the randomorder parameter if it is set, not
# randompick.	# randompick.

@map_ids=&math::Random::random_permutation(@map_ids);	@map_ids=&Math::Random::random_permutation(@map_ids);
}	}


Line 1220 sub readmap {	Line 1220 sub readmap {
#	#
&Apache::lonnet::appenv({"request.course.id" => $short,	&Apache::lonnet::appenv({"request.course.id" => $short,
"request.course.fn" => $fn,	"request.course.fn" => $fn,
"request.course.uri" => $uri});	"request.course.uri" => $uri,
	"request.course.tied" => time});

$untiedhash = untie(%hash);	$untiedhash = untie(%hash);
$untiedparmhash = untie(%parmhash);	$untiedparmhash = untie(%parmhash);
$gotstate = 1;	$gotstate = 1;
Line 1376 sub build_tmp_hashes {	Line 1378 sub build_tmp_hashes {
if (defined($hash{'map_start_'.$uri})) {	if (defined($hash{'map_start_'.$uri})) {
&Apache::lonnet::appenv({"request.course.id" => $short,	&Apache::lonnet::appenv({"request.course.id" => $short,
"request.course.fn" => $fn,	"request.course.fn" => $fn,
"request.course.uri" => $uri});	"request.course.uri" => $uri,
	"request.course.tied" => time});
$env{'request.course.id'}=$short;	$env{'request.course.id'}=$short;
&traceroute('0',$hash{'map_start_'.$uri},'&');	&traceroute('0',$hash{'map_start_'.$uri},'&');
&accinit($uri,$short,$fn);	&accinit($uri,$short,$fn);