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

[albertel]

albertel		Mon Jun 11 16:59:18 2007 EDT

  Modified files:              
    /loncom/interface	portfolio.pm 
  Log:
  - occured -> occurred
  
  
Index: loncom/interface/portfolio.pm
diff -u loncom/interface/portfolio.pm:1.181 loncom/interface/portfolio.pm:1.182
--- loncom/interface/portfolio.pm:1.181	Mon Jun 11 16:56:38 2007
+++ loncom/interface/portfolio.pm	Mon Jun 11 16:59:17 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # portfolio browser
 #
-# $Id: portfolio.pm,v 1.181 2007/06/11 20:56:38 albertel Exp $
+# $Id: portfolio.pm,v 1.182 2007/06/11 20:59:17 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -567,7 +567,7 @@
 					       $delete_file);
         if ($result ne 'ok') {
 	    $r->print('<span class="LC_error">'.
-                     &mt('An error occured ([_1]) while trying to delete 
+                     &mt('An error occurred ([_1]) while trying to delete 
                          [_2].',$result,&display_file(undef, $delete_file)).
                       '</span><br /><br />');
         } else {
@@ -588,7 +588,7 @@
                     &Apache::lonnet::modify_access_controls($file_name,\%changes,
                                                             $udom,$uname);
                     if ($outcome ne 'ok') {
-                           $r->print('<br />'.&mt("An error occured ([_1]) while ".
+                           $r->print('<br />'.&mt("An error occurred ([_1]) while ".
                                "trying to delete access controls for the file.",$outcome).
                                '</span><br /><br />');
                     } else {
@@ -596,7 +596,7 @@
                             $r->print('<br />'.&mt('Access controls also deleted for the file.').'<br /><br />');
                         } else {
                             $r->print('<span class="LC_error">'.'<br />'.
-                               &mt("An error occured ([_1]) while ".
+                               &mt("An error occurred ([_1]) while ".
                                    "trying to delete access controls for the file.",$deloutcome).
                                    '</span><br /><br />');
                         }
@@ -626,7 +626,7 @@
 					       $directory_name);
 					       
     if ($result ne 'ok') {
-	$r->print('<span class="LC_error"> An error occured (dir) ('.$result.
+	$r->print('<span class="LC_error"> An error occurred (dir) ('.$result.
 		  ') while trying to delete '.$directory_name.'</span><br />');
     } else {
         # now remove from recent
@@ -681,7 +681,7 @@
         $chg_access = &access_for_renamed($filenewname,$group,$udom,$uname);
     } else {      
 	$r->print('<span class="LC_error">'.
-		  &mt('An error occured ([_1]) while trying to rename [_2]'
+		  &mt('An error occurred ([_1]) while trying to rename [_2]'
 		      .' to [_3]',$result,&display_file(),
 		      &display_file('',$filenewname)).'</span><br />');
         return;
@@ -718,13 +718,13 @@
             &Apache::lonnet::modify_access_controls($oldfile,\%change_old,
 						    $udom,$uname);
         if ($outcome ne 'ok') {
-            $chg_text ='<br /><br />'.&mt("An error occured ([_1]) while ".
+            $chg_text ='<br /><br />'.&mt("An error occurred ([_1]) while ".
                 "trying to delete access control records for the old name.",$outcome).
                 '</span><br />';
         } else {
             if ($deloutcome ne 'ok') {
                 $chg_text = '<br /><br /><span class="LC_error"><br />'.
-		    &mt("An error occured ([_1]) while ".
+		    &mt("An error occurred ([_1]) while ".
 			"trying to delete access control records for the old name.",$deloutcome).
 			'</span><br />';
             }
@@ -734,7 +734,7 @@
                                                     $udom,$uname);
         if ($outcome ne 'ok') {
             $chg_text .= '<br /><br />'.
-		&mt("An error occured ([_1]) while ".
+		&mt("An error occurred ([_1]) while ".
                 "trying to update access control records for the new name.",$outcome).
                 '</span><br />';
         }
@@ -1818,7 +1818,7 @@
 					$port_path.$env{'form.currentpath'},
 					$mode,\%allfiles,\%codebase);
     if ($result !~ m|^/uploaded/|) {
-	$r->print('<span class="LC_error">'.'An error occured ('.$result.
+	$r->print('<span class="LC_error">'.'An error occurred ('.$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 error occured ('.$result.
+	    $r->print('<span class="LC_error">'.'An error occurred ('.$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 error occured ('.$result.
+    	    $r->print('<span class="LC_error">'.'An error occurred ('.$result.
 	    	      ') while trying to create a new directory '.&display_file().'</span><br />');
         }
     }