--- loncom/interface/statistics/lonstudentsubmissions.pm 2006/08/18 15:15:38 1.46 +++ loncom/interface/statistics/lonstudentsubmissions.pm 2008/10/23 09:07:51 1.49 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstudentsubmissions.pm,v 1.46 2006/08/18 15:15:38 raeburn Exp $ +# $Id: lonstudentsubmissions.pm,v 1.49 2008/10/23 09:07:51 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -928,9 +928,9 @@ sub prepare_csv_output { time.'_'.rand(1000000000).'.csv'; unless ($outputfile = Apache::File->new('>/home/httpd'.$filename)) { $r->log_error("Couldn't open $filename for output $!"); - $r->print("Problems occured in writing the csv file. ". - "This error has been logged. ". - "Please alert your LON-CAPA administrator."); + $r->print(&mt('Problems occurred in writing the CSV file. ' + .'This error has been logged. ' + .'Please alert your LON-CAPA administrator.')); $outputfile = undef; } # @@ -1046,9 +1046,9 @@ sub prepare_csv_output { # Close the progress window &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state); # - # Tell the user where to get their csv file + # Tell the user where to get their CSV file $r->print('
'. - ''.&mt('Your csv file.').''."\n"); + ''.&mt('Your CSV file.').''."\n"); $r->rflush(); return; } @@ -1152,10 +1152,11 @@ sub CreateInterface { $Str .= ''."\n"; $Str .= ''."\n"; # - $Str .= '

'.&mt('Status: [_1]', - ''). - ''.'

'; + $Str .= '

' + .&mt('Status: [_1]', + '') + .'

'; ## return $Str; }