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

[bisitz]

bisitz		Tue Dec  3 16:39:48 2013 EDT

  Modified files:              
    /loncom/homework	edit.pm 
    /loncom/xml	lonxml.pm 
  Log:
  Internationalization of colorful editor: Added missing &mt() calls
  
  
Index: loncom/homework/edit.pm
diff -u loncom/homework/edit.pm:1.148 loncom/homework/edit.pm:1.149
--- loncom/homework/edit.pm:1.148	Thu Sep  5 12:07:29 2013
+++ loncom/homework/edit.pm	Tue Dec  3 16:39:45 2013
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # edit mode helpers
 #
-# $Id: edit.pm,v 1.148 2013/09/05 12:07:29 goltermann Exp $
+# $Id: edit.pm,v 1.149 2013/12/03 16:39:45 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -161,7 +161,7 @@
     if ($target eq "edit") {
 	my $tag=$token->[1];
 	if (!$description) {
-	    $description=&Apache::lonxml::description($token);
+	    $description=&mt(&Apache::lonxml::description($token));
 	    if (!$description) { $description="<$tag>"; }
 	}
 	$result.= &start_table($token)."<tr><td>$description</td>
Index: loncom/xml/lonxml.pm
diff -u loncom/xml/lonxml.pm:1.544 loncom/xml/lonxml.pm:1.545
--- loncom/xml/lonxml.pm:1.544	Tue Oct 29 21:01:21 2013
+++ loncom/xml/lonxml.pm	Tue Dec  3 16:39:47 2013
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # XML Parser Module 
 #
-# $Id: lonxml.pm,v 1.544 2013/10/29 21:01:21 raeburn Exp $
+# $Id: lonxml.pm,v 1.545 2013/12/03 16:39:47 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -144,7 +144,7 @@
 # turns on and of run::evaluate actually derefencing var refs
 $evaluate = 1;
 
-# data structure for eidt mode, determines what tags can go into what other tags
+# data structure for edit mode, determines what tags can go into what other tags
 %insertlist=();
 
 # stores the list of active tag namespaces
@@ -2287,7 +2287,7 @@
 sub helpinfo {
     my ($token)=@_;
     my $tag = &get_tag($token);
-    return ($insertlist{$tag.'.helpfile'}, $insertlist{$tag.'.helpdesc'});
+    return ($insertlist{$tag.'.helpfile'}, &mt($insertlist{$tag.'.helpdesc'}));
 }
 
 sub get_tag {