[LON-CAPA-cvs] cvs: loncom(version_2_9_X) /interface lonuserutils.pm

[raeburn]

raeburn		Wed Jan 20 20:40:43 2010 EDT

  Modified files:              (Branch: version_2_9_X)
    /loncom/interface	lonuserutils.pm 
  Log:
  - Backport 1.108.
  
  
Index: loncom/interface/lonuserutils.pm
diff -u loncom/interface/lonuserutils.pm:1.97.2.9 loncom/interface/lonuserutils.pm:1.97.2.10
--- loncom/interface/lonuserutils.pm:1.97.2.9	Wed Jan 20 20:38:52 2010
+++ loncom/interface/lonuserutils.pm	Wed Jan 20 20:40:43 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Utility functions for managing LON-CAPA user accounts
 #
-# $Id: lonuserutils.pm,v 1.97.2.9 2010/01/20 20:38:52 raeburn Exp $
+# $Id: lonuserutils.pm,v 1.97.2.10 2010/01/20 20:40:43 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2462,9 +2462,13 @@
                        time.'_'.rand(1000000000).'.csv';
         unless ($CSVfile = Apache::File->new('>/home/httpd'.$CSVfilename)) {
             $r->log_error("Couldn't open $CSVfilename for output $!");
-            $r->print(&mt('Problems occurred in writing the CSV file. '
-                         .'This error has been logged. '
-                         .'Please alert your LON-CAPA administrator.'));
+            $r->print(
+                '<p class="LC_error">'
+               .&mt('Problems occurred in writing the CSV file.')
+               .' '.&mt('This error has been logged.')
+               .' '.&mt('Please alert your LON-CAPA administrator.')
+               .'</p>'
+            );
             $CSVfile = undef;
         }
         #