--- loncom/interface/lonparmset.pm 2003/12/12 19:41:11 1.139.2.2
+++ loncom/interface/lonparmset.pm 2003/12/04 20:06:29 1.140
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set parameters for assessments
#
-# $Id: lonparmset.pm,v 1.139.2.2 2003/12/12 19:41:11 albertel Exp $
+# $Id: lonparmset.pm,v 1.140 2003/12/04 20:06:29 sakharuk Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1099,9 +1099,9 @@ sub assessparms {
'rl' => "Resource Level",
'ic' => 'in Course',
'aut' => "Assessment URL and Title",
- 'type' => 'Type',
+ 'type' => &mt('Type'),
'emof' => "Enclosing Map or Folder",
- 'part' => 'Part',
+ 'part' => &mt('Part'),
'pn' => 'Parameter Name',
'def' => 'default',
'femof' => 'from Enclosing Map or Folder',
@@ -1507,26 +1507,29 @@ sub crsenv {
# -------------------------------------------------------- Get parameters again
my %values=&Apache::lonnet::dump('environment',$dom,$crs);
+ my $SelectStyleFile=&mt('Select Style File');
my $output='';
if (! exists($values{'con_lost'})) {
my %descriptions=
- ('url' => 'Top Level Map '.
+ ('url' => ''.&mt('Top Level Map').' '.
'".
- 'Select Map
'.
- 'Modification may make assessment data '.
- 'inaccessible',
- 'description' => 'Course Description',
- 'courseid' => 'Course ID or number
'.
- '(internal, optional)',
- 'grading' => 'Grading'.
- '"standard", "external", or any other value.'.
- ' Default for new courses is "standard".',
-
- 'default_xml_style' => 'Default XML Style File '.
+ &mt('Select Map').'
'.
+ &mt('Modification may make assessment data inaccessible').
+ '',
+ 'description' => ''.&mt('Course Description').'',
+ 'courseid' => ''.&mt('Course ID').' '.&mt('or').' '.&mt('number').
+ '
'.
+ '('.&mt('internal').', '.&mt('optional').')',
+ 'grading' => ''.&mt('Grading').''.
+ ' "'.&mt('standard').'", "'.&mt('external').'", '.
+ &mt('or any other value').'.'.
+ ' '.&mt('Default for new courses is').' "'.
+ &mt('standard').'".',
+ 'default_xml_style' => ''.&mt('Default XML Style File').' '.
'Select Style File
",
+ ",'sty')\">$SelectStyleFile
",
'question.email' => 'Feedback Addresses for Resource Content '.
'Questions
(user:domain,'.
'user:domain(section;section;...;*;...),...)',
@@ -1578,9 +1581,9 @@ sub crsenv {
=> 'Allow limited HTML in discussion posts
'.
'(Set value to "yes" to allow)',
'rndseed'
- => 'Randomization algorithm used
'.
- 'Modifying this will make problems '.
- 'have different numbers and answers',
+ => ''.&mt('Randomization algorithm used').'
'.
+ ''.&mt('Modifying this will make problems').' '.
+ &mt('have different numbers and answers').'',
'problem_stream_switch'
=> 'Allow problems to be split over pages
'.
' ("yes" if allowed, anything else if not)',
@@ -1591,7 +1594,7 @@ sub crsenv {
'when enrolling students',
'default_enrollment_end_date' => 'Default ending date '.
'when enrolling students',
- 'languages' => 'Languages used',
+ 'languages' => ''.&mt('Languages used').'',
'disable_receipt_display'
=> 'Disable display of problem receipts
'.
' ("yes" to disable, anything else if not)'
@@ -1614,12 +1617,10 @@ sub crsenv {
'default_enrollment_end_date',
);
foreach my $parameter (sort(keys(%values))) {
- unless ($parameter =~ m/^internal\./) {
- if (! $descriptions{$parameter}) {
- $descriptions{$parameter}=$parameter;
- push(@Display_Order,$parameter);
- }
- }
+ if (! $descriptions{$parameter}) {
+ $descriptions{$parameter}=$parameter;
+ push(@Display_Order,$parameter);
+ }
}
foreach my $parameter (@Display_Order) {
my $description = $descriptions{$parameter};
@@ -1656,6 +1657,8 @@ sub crsenv {
$onchange.' />