--- loncom/interface/lonhelper.pm 2004/04/20 15:46:34 1.70
+++ loncom/interface/lonhelper.pm 2004/04/21 17:57:02 1.72
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# .helper XML handler to implement the LON-CAPA helper
#
-# $Id: lonhelper.pm,v 1.70 2004/04/20 15:46:34 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 @@ sub render {
# Print the granularity, depending on the action
if ($vars->{GRANULARITY} eq 'whole_course') {
- $resourceString .= '
for all resources in the course';
+ $resourceString .= ''.&mt('for').' '.&mt('all resources in the course').'';
$level = 9; # general course, see lonparmset.pm perldoc
$affectedResourceId = "0.0";
$symb = 'a';
@@ -3157,12 +3157,12 @@ sub render {
$result .= ''.&mt('Confirm that this information is correct, then click "Finish Helper" to complete setting the parameter.').'
';
# Print the type of manipulation:
- $result .= '- Setting the ' . $dateTypeHash{$vars->{ACTION_TYPE}} . '';
+ $result .= '
- '.&mt('Setting the').' ' . &mt($dateTypeHash{$vars->{ACTION_TYPE}}) . '';
if ($vars->{ACTION_TYPE} eq 'tries') {
- $result .= ' to ' . $vars->{TRIES} . '';
+ $result .= ' '.&mt('to').' ' . $vars->{TRIES} . '';
}
if ($vars->{ACTION_TYPE} eq 'weight') {
- $result .= ' to ' . $vars->{WEIGHT} . '';
+ $result .= ' '.&mt('to').' ' . $vars->{WEIGHT} . '';
}
$result .= "
\n";
if ($vars->{ACTION_TYPE} eq 'due_date' ||
@@ -3193,10 +3193,10 @@ sub render {
# Print targets
if ($vars->{TARGETS} eq 'course') {
- $result .= '- for all students in course
';
+ $result .= '- '.&mt('for').' '.&mt('all students in course').'
';
} elsif ($vars->{TARGETS} eq 'section') {
my $section = $vars->{SECTION_NAME};
- $result .= "- for section $section
";
+ $result .= "- ".&mt('for section')." $section
";
$level -= 3;
$result .= "&"') . "' />\n";
@@ -3207,7 +3207,7 @@ sub render {
# Chop off everything after the last colon (section)
$username = substr($username, 0, rindex($username, ':'));
my $name = $classlist->{$username}->[6];
- $result .= "- for $name
";
+ $result .= "- ".&mt('for')." $name
";
$level -= 6;
my ($uname, $udom) = split /:/, $vars->{USER_NAME};
$result .= "{ACTION_TYPE} ne 'weight') {
- $result .= "- to " . ctime($vars->{PARM_DATE}) . " (" .
+ $result .= "
- ".&mt('to')." " . ctime($vars->{PARM_DATE}) . " (" .
Apache::lonnavmaps::timeToHumanString($vars->{PARM_DATE})
. ")
\n";
}
@@ -3233,7 +3233,7 @@ sub render {
$result .= "\n";
$result .= "\n";
- $result .= "
\n";
+ $result .= "
\n";
return $result;
}