[LON-CAPA-cvs] cvs: loncom /xml lonxml.pm

[bisitz]

bisitz		Mon Apr 28 10:38:45 2008 EDT

  Modified files:              
    /loncom/xml	lonxml.pm 
  Log:
  Localization:
  Added missing mt() calls
  
  
Index: loncom/xml/lonxml.pm
diff -u loncom/xml/lonxml.pm:1.475 loncom/xml/lonxml.pm:1.476
--- loncom/xml/lonxml.pm:1.475	Fri Mar 21 14:36:48 2008
+++ loncom/xml/lonxml.pm	Mon Apr 28 10:38:45 2008
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # XML Parser Module 
 #
-# $Id: lonxml.pm,v 1.475 2008/03/21 18:36:48 raeburn Exp $
+# $Id: lonxml.pm,v 1.476 2008/04/28 14:38:45 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1761,7 +1761,8 @@
 	    $title = $env{'request.filename'};
 	    $title = substr($title, rindex($title, '/') + 1);
 	}
-	$result = "<script type='text/javascript'>top.document.title = '$title - LON-CAPA Construction Space';</script>";
+        $result = "<script type='text/javascript'>top.document.title = '$title - LON-CAPA "
+                  .&mt('Construction Space')."';</script>";
     }
     return $result;
 }
@@ -1815,7 +1816,7 @@
 	# If printing in construction space, put the error inside <pre></pre>
 	push(@Apache::lonxml::error_messages,
 	     $Apache::lonxml::warnings_error_header.
-	     "<b>ERROR:</b>".join("<br />\n",@errors)."<br />\n");
+             "<b>".&mt('ERROR:')."</b>".join("<br />\n",@errors)."<br />\n");
 	$Apache::lonxml::warnings_error_header='';
     } else {
 	my $errormsg;
@@ -1825,7 +1826,9 @@
 	    $errormsg=&mt("An error occured while processing this resource. The author has been notified.");
 	}
 	my $host=$Apache::lonnet::perlvar{'lonHostID'};
-	push(@errors, "The error occurred on host <tt>$host</tt>");
+	push(@errors,
+        &mt("The error occurred on host [_1]",
+             "<tt>$host</tt>"));
 
 	my $msg = join('<br />', @errors);