Made session id's more unique.

This commit is contained in:
JT Smith 2002-12-12 04:14:51 +00:00
parent 285fd75ced
commit 8ca3571111

View file

@ -28,7 +28,7 @@ tie %session, 'Tie::CPHash';
#-------------------------------------------------------------------
sub _generateSessionId {
my ($sessionId);
$sessionId = crypt(time(),rand(99));
$sessionId = crypt((time()*rand(1000)),rand(99));
return $sessionId;
}