|
version 1.151, 2003/11/10 20:30:45
|
version 1.152, 2003/11/10 23:25:52
|
|
Line 2745 the routine &Apache::lonnet::transfer_pr
|
Line 2745 the routine &Apache::lonnet::transfer_pr
|
| |
|
| ############################################################ |
############################################################ |
| ############################################################ |
############################################################ |
| |
my $uniq=0; |
| sub get_cgi_id { |
sub get_cgi_id { |
| return (time.'_'.int(rand(1000))); |
$uniq=($uniq++)%100000; |
| |
return (time.'_'.$uniq); |
| } |
} |
| |
|
| ############################################################ |
############################################################ |
![[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