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

sakharuk lon-capa-cvs@mail.lon-capa.org
Tue, 27 Apr 2004 15:32:45 -0000


sakharuk		Tue Apr 27 11:32:45 2004 EDT

  Modified files:              
    /loncom/interface	lonhelper.pm 
  Log:
  Corrected localization for changing parameters.
  
  
Index: loncom/interface/lonhelper.pm
diff -u loncom/interface/lonhelper.pm:1.76 loncom/interface/lonhelper.pm:1.77
--- loncom/interface/lonhelper.pm:1.76	Tue Apr 27 11:15:41 2004
+++ loncom/interface/lonhelper.pm	Tue Apr 27 11:32:45 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # .helper XML handler to implement the LON-CAPA helper
 #
-# $Id: lonhelper.pm,v 1.76 2004/04/27 15:15:41 sakharuk Exp $
+# $Id: lonhelper.pm,v 1.77 2004/04/27 15:32:45 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3114,7 +3114,7 @@
         my $title = $res->compTitle();
         $symb = $res->symb();
         $navmap->untieHashes();
-        $resourceString .= "<li>for the map named <b>$title</b></li>";
+        $resourceString .= &mt('<li>for the map named <b>[_1]</b></li>',$title);
         $level = 8;
         $affectedResourceId = $vars->{RESOURCE_ID};
         $paramlevel = 'map';
@@ -3124,7 +3124,7 @@
         $symb = $res->symb();
         my $title = $res->compTitle();
         $navmap->untieHashes();
-        $resourceString .= "<li>for the resource named <b>$title</b></li>";
+        $resourceString .= &mt('<li>for the resource named <b>[_1]</b></li>',$title);
         $level = 7;
         $affectedResourceId = $vars->{RESOURCE_ID};
         $paramlevel = 'full';
@@ -3180,7 +3180,7 @@
         $result .= '<li>'.&mt('for <b>all students in course</b>').'</li>';
     } elsif ($vars->{TARGETS} eq 'section') {
         my $section = $vars->{SECTION_NAME};
-        $result .= "<li>".&mt('for section')." <b>$section</b></li>";
+        $result .= &mt('<li>for section <b>[_1]</b></li>',$section);
         $level -= 3;
         $result .= "<input type='hidden' name='csec' value='" .
             HTML::Entities::encode($section,'<>&"') . "' />\n";
@@ -3191,7 +3191,7 @@
         # Chop off everything after the last colon (section)
         $username = substr($username, 0, rindex($username, ':'));
         my $name = $classlist->{$username}->[6];
-        $result .= "<li>".&mt('for')." <b>$name</b></li>";
+        $result .= &mt('<li>for <b>[_1]</b></li>',$name);
 ##        $result .= "<li>".&mt('for [_1]',"<b>$name</b>")."</li>";
         $level -= 6;
         my ($uname, $udom) = split /:/, $vars->{USER_NAME};