diff --git a/lib/WebGUI/Session.pm b/lib/WebGUI/Session.pm index 19e746e1e..907355599 100644 --- a/lib/WebGUI/Session.pm +++ b/lib/WebGUI/Session.pm @@ -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; }