![[BACK]](/icons/back.gif){kind=icon}
Return to loncommon.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to loncommon.pm CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.683, 2008/09/11 14:47:21 | version 1.684, 2008/09/11 15:15:29 |
|---|---|
| Line 9344 sub init_user_environment { | Line 9344 sub init_user_environment { |
| } | } |
| # Give them a new cookie | # Give them a new cookie |
| my $id = ($args->{'robot'} ? 'robot'.$args->{'robot'} | my $id = ($args->{'robot'} ? 'robot'.$args->{'robot'} |
| : $now); | : $now.$$.int(rand(10000))); |
| $cookie="$username\_$id\_$domain\_$authhost"; | $cookie="$username\_$id\_$domain\_$authhost"; |
| # Initialize roles | # Initialize roles |