rat/lonuserstate.pm - diff

Return to lonuserstate.pm CVS log

Up to [LON-CAPA] / rat

version 1.81, 2004/10/26 23:00:11	version 1.83, 2004/12/06 21:41:01
Line 150 sub loadmap {	Line 150 sub loadmap {
$hash{'version_'.$turi}=$1;	$hash{'version_'.$turi}=$1;
}	}
}	}
	my $title=$token->[2]->{'title'};
	$title=~s/\&colon\;/\:/gs;
&Apache::lonnet::do_cache(\%Apache::lonnet::titlecache,	&Apache::lonnet::do_cache(\%Apache::lonnet::titlecache,
&Apache::lonnet::encode_symb($uri,$token->[2]->{'id'},	&Apache::lonnet::encode_symb($uri,$token->[2]->{'id'},
$turi),	$turi),$title,'title');
$token->[2]->{'title'},'title');
unless ($ispage) {	unless ($ispage) {
$turi=~/\.(\w+)$/;	$turi=~/\.(\w+)$/;
my $embstyle=&Apache::loncommon::fileembstyle($1);	my $embstyle=&Apache::loncommon::fileembstyle($1);
Line 580 sub readmap {	Line 581 sub readmap {
}	}
# ---------------------------------------------------------------- Encrypt URLs	# ---------------------------------------------------------------- Encrypt URLs
foreach (keys %encurl) {	foreach (keys %encurl) {
$hash{'src_'.$_}=&Apache::lonenc::encrypted($hash{'src_'.$_});	# $hash{'src_'.$_}=&Apache::lonenc::encrypted($hash{'src_'.$_});
	$hash{'encrypted_'.$_}=1;
}	}
# ----------------------------------------------- Close hashes to finally store	# ----------------------------------------------- Close hashes to finally store
# --------------------------------- Routine must pass this point, no early outs	# --------------------------------- Routine must pass this point, no early outs