[LON-CAPA-cvs] cvs: loncom /interface portfolio.pm

[albertel]

albertel		Mon Jun 11 16:56:39 2007 EDT

  Modified files:              
    /loncom/interface	portfolio.pm 
  Log:
  - error has only 3 not 4 r's
  
  
Index: loncom/interface/portfolio.pm
diff -u loncom/interface/portfolio.pm:1.180 loncom/interface/portfolio.pm:1.181
--- loncom/interface/portfolio.pm:1.180	Mon Jun 11 13:13:30 2007
+++ loncom/interface/portfolio.pm	Mon Jun 11 16:56:38 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # portfolio browser
 #
-# $Id: portfolio.pm,v 1.180 2007/06/11 17:13:30 albertel Exp $
+# $Id: portfolio.pm,v 1.181 2007/06/11 20:56:38 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1818,7 +1818,7 @@
 					$port_path.$env{'form.currentpath'},
 					$mode,\%allfiles,\%codebase);
     if ($result !~ m|^/uploaded/|) {
-	$r->print('<span class="LC_error">'.'An errror occured ('.$result.
+	$r->print('<span class="LC_error">'.'An error occured ('.$result.
 		  ') while trying to upload '.&display_file().'</span><br />');
 	$r->print(&done('Back',$url));
     } else {
@@ -1870,7 +1870,7 @@
 	    &Apache::lonnet::userfileupload('embedded_item_'.$i,'',
 					    $port_path.$path);
 	if ($result !~ m|^/uploaded/|) {
-	    $r->print('<span class="LC_error">'.'An errror occured ('.$result.
+	    $r->print('<span class="LC_error">'.'An error occured ('.$result.
 		      ') while trying to upload '.&display_file($path,$fname).'</span><br />');
 	    next;
 	} else {
@@ -1953,7 +1953,7 @@
         my $result=&Apache::lonnet::mkdiruserfile($uname,$udom,
 	         $port_path.$env{'form.currentpath'}.$newdir);
         if ($result ne 'ok') {
-    	    $r->print('<span class="LC_error">'.'An errror occured ('.$result.
+    	    $r->print('<span class="LC_error">'.'An error occured ('.$result.
 	    	      ') while trying to create a new directory '.&display_file().'</span><br />');
         }
     }