[LON-CAPA-cvs] cvs: loncom(version_2_7_X) /interface loncommon.pm

[raeburn]

raeburn		Fri Sep 19 18:54:47 2008 EDT

  Modified files:              (Branch: version_2_7_X)
    /loncom/interface	loncommon.pm 
  Log:
  Backport 1.684
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.679.2.2 loncom/interface/loncommon.pm:1.679.2.3
--- loncom/interface/loncommon.pm:1.679.2.2	Fri Sep 19 18:52:41 2008
+++ loncom/interface/loncommon.pm	Fri Sep 19 18:54:46 2008
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.679.2.2 2008/09/19 22:52:41 raeburn Exp $
+# $Id: loncommon.pm,v 1.679.2.3 2008/09/19 22:54:46 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -9323,7 +9323,7 @@
 	}
 # Give them a new cookie
 	my $id = ($args->{'robot'} ? 'robot'.$args->{'robot'}
-		                   : $now);
+		                   : $now.$$.int(rand(10000)));
 	$cookie="$username\_$id\_$domain\_$authhost";
     
 # Initialize roles