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

sakharuk lon-capa-cvs@mail.lon-capa.org
Wed, 21 Apr 2004 17:57:02 -0000


sakharuk		Wed Apr 21 13:57:02 2004 EDT

  Modified files:              
    /loncom/interface	lonhelper.pm 
  Log:
  Added some localization statements.
  
  
Index: loncom/interface/lonhelper.pm
diff -u loncom/interface/lonhelper.pm:1.71 loncom/interface/lonhelper.pm:1.72
--- loncom/interface/lonhelper.pm:1.71	Wed Apr 21 13:29:57 2004
+++ loncom/interface/lonhelper.pm	Wed Apr 21 13:57:02 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # .helper XML handler to implement the LON-CAPA helper
 #
-# $Id: lonhelper.pm,v 1.71 2004/04/21 17:29:57 sakharuk Exp $
+# $Id: lonhelper.pm,v 1.72 2004/04/21 17:57:02 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3126,7 +3126,7 @@
 
     # Print the granularity, depending on the action
     if ($vars->{GRANULARITY} eq 'whole_course') {
-        $resourceString .= '<li>for <b>all resources in the course</b></li>';
+        $resourceString .= '<li>'.&mt('for').' <b>'.&mt('all resources in the course').'</b></li>';
         $level = 9; # general course, see lonparmset.pm perldoc
         $affectedResourceId = "0.0";
         $symb = 'a';
@@ -3196,7 +3196,7 @@
         $result .= '<li>'.&mt('for').' <b>'.&mt('all students in course').'</b></li>';
     } elsif ($vars->{TARGETS} eq 'section') {
         my $section = $vars->{SECTION_NAME};
-        $result .= "<li>for section <b>$section</b></li>";
+        $result .= "<li>".&mt('for section')." <b>$section</b></li>";
         $level -= 3;
         $result .= "<input type='hidden' name='csec' value='" .
             HTML::Entities::encode($section,'<>&"') . "' />\n";
@@ -3207,7 +3207,7 @@
         # Chop off everything after the last colon (section)
         $username = substr($username, 0, rindex($username, ':'));
         my $name = $classlist->{$username}->[6];
-        $result .= "<li>for <b>$name</b></li>";
+        $result .= "<li>".&mt('for')." <b>$name</b></li>";
         $level -= 6;
         my ($uname, $udom) = split /:/, $vars->{USER_NAME};
         $result .= "<input type='hidden' name='uname' value='".
@@ -3218,7 +3218,7 @@
 
     # Print value
     if ($vars->{ACTION_TYPE} ne 'tries' && $vars->{ACTION_TYPE} ne 'weight') {
-	$result .= "<li>to <b>" . ctime($vars->{PARM_DATE}) . "</b> (" .
+	$result .= "<li>".&mt('to')." <b>" . ctime($vars->{PARM_DATE}) . "</b> (" .
 	    Apache::lonnavmaps::timeToHumanString($vars->{PARM_DATE}) 
 	    . ")</li>\n";
     }