loncom/lond - diff

Return to lond CVS log

Up to [LON-CAPA] / loncom

version 1.331, 2006/05/30 15:39:56	version 1.332, 2006/05/31 14:47:56
Line 2126 sub token_auth_user_file_handler {	Line 2126 sub token_auth_user_file_handler {
my $reply="non_auth\n";	my $reply="non_auth\n";
if (open(ENVIN,$perlvar{'lonIDsDir'}.'/'.	if (open(ENVIN,$perlvar{'lonIDsDir'}.'/'.
$session.'.id')) {	$session.'.id')) {
	flock(ENVIN,LOCK_SH);
while (my $line=<ENVIN>) {	while (my $line=<ENVIN>) {
my ($envname)=split(/=/,$line,2);	my ($envname)=split(/=/,$line,2);
$envname=&unescape($envname);	$envname=&unescape($envname);