loncom/auth/lonauth.pm - diff

Return to lonauth.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.1, 1999/10/13 17:48:52	version 1.2, 1999/11/16 19:14:15
Line 1	Line 1
# The LearningOnline Network	# The LearningOnline Network
# User Authentication Module	# User Authentication Module
# 5/21/99,5/22,5/25,5/26,5/27,5/29,6/2,6/11,6/14,6/15 Gerd Kortemeyer	# 5/21/99,5/22,5/25,5/26,5/27,5/29,6/2,6/11,6/14,6/15
	# 16/11 Gerd Kortemeyer

package Apache::lonauth;	package Apache::lonauth;

Line 25 sub success {	Line 26 sub success {
$cookie="$username\_$now\_$domain\_$authhost";	$cookie="$username\_$now\_$domain\_$authhost";
{	{
my $idf=Apache::File->new(">$lonids/$cookie.id");	my $idf=Apache::File->new(">$lonids/$cookie.id");
print $idf "Name: $username\n";	print $idf "username=$username\n";
	print $idf "userdomain=$domain\n";
	print $idf "userhome=$authhost\n";
}	}
}	}
$cookie="lonID=$cookie; path=/";	$cookie="lonID=$cookie; path=/";