Diff for /loncom/interface/lonparmset.pm between versions 1.139 and 1.140

version 1.139, 2003/11/21 19:54:42 version 1.140, 2003/12/04 20:06:29
Line 1099  sub assessparms { Line 1099  sub assessparms {
                                   'rl'     => "Resource Level",                                    'rl'     => "Resource Level",
   'ic'     => 'in Course',    'ic'     => 'in Course',
   'aut'    => "Assessment URL and Title",    'aut'    => "Assessment URL and Title",
   'type'   => 'Type',    'type'   => &mt('Type'),
   'emof'   => "Enclosing Map or Folder",    'emof'   => "Enclosing Map or Folder",
   'part'   => 'Part',    'part'   => &mt('Part'),
                                   'pn'     => 'Parameter Name',                                    'pn'     => 'Parameter Name',
   'def'    => 'default',    'def'    => 'default',
   'femof'  => 'from Enclosing Map or Folder',    'femof'  => 'from Enclosing Map or Folder',
Line 1507  sub crsenv { Line 1507  sub crsenv {
 # -------------------------------------------------------- Get parameters again  # -------------------------------------------------------- Get parameters again
   
     my %values=&Apache::lonnet::dump('environment',$dom,$crs);      my %values=&Apache::lonnet::dump('environment',$dom,$crs);
       my $SelectStyleFile=&mt('Select Style File');
     my $output='';      my $output='';
     if (! exists($values{'con_lost'})) {      if (! exists($values{'con_lost'})) {
         my %descriptions=          my %descriptions=
     ('url'            => '<b>Top Level Map</b> '.      ('url'            => '<b>'.&mt('Top Level Map').'</b> '.
                                  '<a href="javascript:openbrowser'.                                   '<a href="javascript:openbrowser'.
                                  "('envform','url','sequence')\">".                                   "('envform','url','sequence')\">".
                                  'Select Map</a><br /><font color=red> '.                                   &mt('Select Map').'</a><br /><font color=red> '.
                                  'Modification may make assessment data '.                                   &mt('Modification may make assessment data inaccessible').
                                  'inaccessible</font>',                                   '</font>',
              'description'    => '<b>Course Description</b>',               'description'    => '<b>'.&mt('Course Description').'</b>',
              'courseid'       => '<b>Course ID or number</b><br />'.               'courseid'       => '<b>'.&mt('Course ID').' '.&mt('or').' '.&mt('number').
                                  '(internal, optional)',                                   '</b><br />'.
              'grading'        => '<b>Grading</b>'.                                   '('.&mt('internal').', '.&mt('optional').')',
                                  '"standard", "external", or any other value.'.               'grading'        => '<b>'.&mt('Grading').'</b>'.
                                  '  Default for new courses is "standard".',                                   ' "'.&mt('standard').'", "'.&mt('external').'", '.
                                    &mt('or any other value').'.'.
              'default_xml_style' => '<b>Default XML Style File</b> '.                                   '  '.&mt('Default for new courses is').' "'.
                                    &mt('standard').'".',
                'default_xml_style' => '<b>'.&mt('Default XML Style File').'</b> '.
                     '<a href="javascript:openbrowser'.                      '<a href="javascript:openbrowser'.
                     "('envform','default_xml_style'".                      "('envform','default_xml_style'".
                     ",'sty')\">Select Style File</a><br>",                      ",'sty')\">$SelectStyleFile</a><br>",
              'question.email' => '<b>Feedback Addresses for Resource Content '.               'question.email' => '<b>Feedback Addresses for Resource Content '.
                                  'Questions</b><br />(<tt>user:domain,'.                                   'Questions</b><br />(<tt>user:domain,'.
                                  'user:domain(section;section;...;*;...),...</tt>)',                                   'user:domain(section;section;...;*;...),...</tt>)',
Line 1578  sub crsenv { Line 1581  sub crsenv {
          => '<b>Allow limited HTML in discussion posts</b><br />'.           => '<b>Allow limited HTML in discussion posts</b><br />'.
             '(Set value to "<tt>yes</tt>" to allow)',              '(Set value to "<tt>yes</tt>" to allow)',
      'rndseed'       'rndseed'
          => '<b>Randomization algorithm used</b> <br />'.           => '<b>'.&mt('Randomization algorithm used').'</b> <br />'.
                     '<font color="red">Modifying this will make problems '.                      '<font color="red">'.&mt('Modifying this will make problems').' '.
                     'have different numbers and answers</font>',                      &mt('have different numbers and answers').'</font>',
              'problem_stream_switch'               'problem_stream_switch'
                  => '<b>Allow problems to be split over pages</b><br />'.                   => '<b>Allow problems to be split over pages</b><br />'.
                     ' ("<tt>yes</tt>" if allowed, anything else if not)',                      ' ("<tt>yes</tt>" if allowed, anything else if not)',
Line 1591  sub crsenv { Line 1594  sub crsenv {
                                                 'when enrolling students</b>',                                                  'when enrolling students</b>',
              'default_enrollment_end_date'   => '<b>Default ending date '.               'default_enrollment_end_date'   => '<b>Default ending date '.
                                                 'when enrolling students</b>',                                                  'when enrolling students</b>',
              'languages' => '<b>Languages used</b>',               'languages' => '<b>'.&mt('Languages used').'</b>',
              'disable_receipt_display'               'disable_receipt_display'
                  => '<b>Disable display of problem receipts</b><br />'.                   => '<b>Disable display of problem receipts</b><br />'.
                     ' ("<tt>yes</tt>" to disable, anything else if not)'                      ' ("<tt>yes</tt>" to disable, anything else if not)'
Line 1654  sub crsenv { Line 1657  sub crsenv {
                 $onchange.' /></td><td>'.                  $onchange.' /></td><td>'.
     '<input type="checkbox" name="newp_setparmval" /></td></tr>';      '<input type="checkbox" name="newp_setparmval" /></td></tr>';
     }      }
       my $Parameter=&mt('Parameter');
       my $Value=&mt('Value');
     $r->print(<<ENDENV);      $r->print(<<ENDENV);
 <html>  <html>
 <script type="text/javascript" language="Javascript" >  <script type="text/javascript" language="Javascript" >
Line 1688  $bodytag Line 1693  $bodytag
 $setoutput  $setoutput
 <p>  <p>
 <table border=2>  <table border=2>
 <tr><th>Parameter</th><th>Value</th><th>Set?</th></tr>  <tr><th>$Parameter</th><th>$Value</th><th>Set?</th></tr>
 $output  $output
 </table>  </table>
 <input type="submit" name="crsenv" value="Set Course Environment">  <input type="submit" name="crsenv" value="Set Course Environment">

Removed from v.1.139  
changed lines
  Added in v.1.140


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>