--- loncom/interface/loncommon.pm 2008/09/08 19:39:26 1.682 +++ loncom/interface/loncommon.pm 2008/09/11 15:15:29 1.684 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.682 2008/09/08 19:39:26 raeburn Exp $ +# $Id: loncommon.pm,v 1.684 2008/09/11 15:15:29 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1507,9 +1507,9 @@ sub create_text_file { $fh = Apache::File->new('>/home/httpd'.$filename); if (! defined($fh)) { $r->log_error("Couldn't open $filename for output $!"); - $r->print("Problems occured in creating the output file. ". - "This error has been logged. ". - "Please alert your LON-CAPA administrator."); + $r->print(&mt('Problems occurred in creating the output file. ' + .'This error has been logged. ' + .'Please alert your LON-CAPA administrator.')); } return ($fh,$filename) } @@ -9344,7 +9344,7 @@ sub init_user_environment { } # Give them a new cookie my $id = ($args->{'robot'} ? 'robot'.$args->{'robot'} - : $now); + : $now.$$.int(rand(10000))); $cookie="$username\_$id\_$domain\_$authhost"; # Initialize roles