[BACK]Return to courseprefs.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/courseprefs.pm between versions 1.8.2.6 and 1.17

version 1.8.2.6, 2010/02/12 00:39:51 version 1.17, 2010/01/07 18:43:32
Line 115  sub handler { Line 115  sub handler {
         %lt = (          %lt = (
                 conf => 'Course Configuration',                  conf => 'Course Configuration',
                 edit => 'Edit Course Configuration',                  edit => 'Edit Course Configuration',
                 gens => 'General course settings',                  gens => 'General Settings',
                 idnu => 'Course ID or number',                  idnu => 'ID/Number',
                 desc => 'Course Description',                  desc => 'Title',
                 catg => 'Categorize course',                  catg => 'Categorize course',
                 excc => 'Exclude from course catalog',                  excc => 'Exclude from course catalog',
                 clon => 'Users allowed to clone course',                  clon => 'Users allowed to clone course',
                 rept => 'Replacement titles for standard course roles',                  rept => 'Replacement titles for standard course roles',
                 time => 'Timezone in which the course takes place',                  time => 'Timezone',
                 date => 'Locale used for course calendar',                  date => 'Calendar Locale',
                 coco => 'Course Content',                  coco => 'Course Content',
                 copo => 'Course Policy',                  copo => 'Course Policy',
                 priv => 'Domain Coordinators in course',                  priv => 'Domain Coordinators in course',
Line 164  sub handler { Line 164  sub handler {
                      header => [{col1 => 'Setting',                       header => [{col1 => 'Setting',
                                  col2 => 'Value'}],                                   col2 => 'Value'}],
                      ordered => ['description','courseid','categories',                       ordered => ['description','courseid','categories',
                                  'hidefromcat','cloners','externalsyllabus',                                   'hidefromcat','externalsyllabus',
                                  'url','rolenames'],                                   'url','rolenames','cloners'],
                      itemtext => {                       itemtext => {
                                    description      => $lt{'desc'},                                     description      => $lt{'desc'},
                                    courseid         => $lt{'idnu'},                                     courseid         => $lt{'idnu'},
                                    categories       => $lt{'catg'},                                     categories       => $lt{'catg'},
                                    hidefromcat      => $lt{'excc'},                                     hidefromcat      => $lt{'excc'},
                                    cloners          => $lt{'clon'},                                      cloners          => $lt{'clon'}, 
                                    externalsyllabus => 'URL of Syllabus',                                     externalsyllabus => 'External Syllabus URL',
                                    url              => 'Top Level Map',                                     url              => 'Top Level Map',
                                    rolenames        => $lt{'rept'},                                     rolenames        => $lt{'rept'},
                                  },                                   },
                     },                      },
         'localization' =>          'localization' =>
                     { text => 'Language/TimeZone/Locale',                      { text => 'Language & Time Localization',
                       help => 'Course_Environment',                        help => 'Course_Environment',
                       header => [{col1 => 'Setting',                        header => [{col1 => 'Setting',
                                   col2 => 'Value',}],                                    col2 => 'Value',}],
                       ordered => ['languages','timezone','datelocale'],                        ordered => ['languages','timezone','datelocale'],
                       itemtext => {                        itemtext => {
                                     languages  => 'Languages used',                                      languages  => 'Language(s)',
                                     timezone   => $lt{'time'},                                       timezone   => $lt{'time'}, 
                                     datelocale => $lt{'date'},                                      datelocale => $lt{'date'},
                                   },                                    },
                     },                      },
         'feedback' =>          'feedback' =>
                     { text => 'Feedback messages',                      { text => 'Feedback Messages',
                       help => 'Course_Environment',                        help => 'Course_Environment',
                       header => [{col1 => 'Questions about:',                        header => [{col1 => 'Questions about:',
                                   col2 => 'Recipients'},                                    col2 => 'Recipients'},
Line 213  sub handler { Line 213  sub handler {
                                   'allow_limited_html_in_feedback',                                    'allow_limited_html_in_feedback',
                                   'allow_discussion_post_editing'],                                    'allow_discussion_post_editing'],
                       itemtext => {                        itemtext => {
                          'plc.roles.denied'             => 'No Resource Discussion',                           'plc.roles.denied'             => 'Disable resource discussion',
                          'plc.users.denied'             => 'No Resource Discussion',                           'plc.users.denied'             => 'Disable resource discussion',
                          'pch.roles.denied'             => 'No Chat room use',                           'pch.roles.denied'             => 'Disable chat room',
                          'pch.users.denied'             => 'No Chat room use',                           'pch.users.denied'             => 'Disable chat room',
                          allow_limited_html_in_feedback => 'Allow limited HTML in discussion posts',                           allow_limited_html_in_feedback => 'HTML in discussion',
                          allow_discussion_post_editing  => 'Users can edit/delete own discussion posts',                           allow_discussion_post_editing  => 'Allow users to edit/delete own discussion posts',
                                   },                                    },
                     },                      },
         'classlists' =>          'classlists' =>
Line 244  sub handler { Line 244  sub handler {
                                   },                                    },
                    },                     },
         'appearance' =>          'appearance' =>
                    { text => 'Display of resources ',                     { text => 'Display of Resources ',
                      help => 'Course_Environment',                       help => 'Course_Environment',
                      header => [{col1 => 'Setting',                       header => [{col1 => 'Setting',
                                  col2 => 'Value'}],                                   col2 => 'Value'}],
Line 252  sub handler { Line 252  sub handler {
                                  'disable_receipt_display','texengine',                                   'disable_receipt_display','texengine',
                                  'tthoptions'],                                   'tthoptions'],
                       itemtext => {                        itemtext => {
                           default_xml_style       => 'Default XML Style File',                            default_xml_style       => 'Default XML style file',
                           pageseparators          => 'Visibly Separate Items on Pages',                            pageseparators          => 'Separate items on composite pages',
                           disable_receipt_display => 'Disable display of problem receipts',                            disable_receipt_display => 'Disable problem receipts display',
                           texengine               => 'Force use of a specific math rendering engine',                            texengine               => 'Force specific math rendering engine',
                           tthoptions              => 'Default set of options to pass to tth/m when converting TeX',                            tthoptions              => 'Default set of options to pass to tth/m when converting TeX',
                                   },                                    },
                   },                    },
Line 267  sub handler { Line 267  sub handler {
                     ordered => ['grading','rndseed',                      ordered => ['grading','rndseed',
                                 'receiptalg','disablesigfigs'],                                  'receiptalg','disablesigfigs'],
                     itemtext => {                      itemtext => {
                         grading        => 'Grading',                          grading        => 'Grading Type',
                         rndseed        => 'Randomization algorithm used',                          rndseed        => 'Randomization algorithm',
                         receiptalg     => 'Receipt algorithm used',                          receiptalg     => 'Receipt algorithm',
                         disablesigfigs => 'Disable checking of Significant Figures',                          disablesigfigs => 'Disable significant figure checks',
                                 },                                  },
   
                   },                    },
         'printouts' =>          'printouts' =>
                   { text => 'Printout generation',                    { text => 'Printouts',
                     help => 'Course_Environment',                      help => 'Course_Environment',
                     header => [{col1 => 'Setting',                      header => [{col1 => 'Setting',
                                 col2 => 'Value',}],                                  col2 => 'Value',}],
                     ordered => ['problem_stream_switch','suppress_tries',                      ordered => ['problem_stream_switch','suppress_tries',
                                 'default_paper_size','print_header_format',                                  'default_paper_size','print_header_format',
                                 'disableexampointprint'],                                  'disableexampointprint','canuse_pdfforms'],
                     itemtext => {                      itemtext => {
                         problem_stream_switch => 'Allow problems to be split over pages',                          problem_stream_switch => 'Allow problems to be split over pages',
                         suppress_tries        => 'Suppress number of tries in printing',                          suppress_tries        => 'Suppress number of tries in printing',
                         default_paper_size    => 'Default paper type',                          default_paper_size    => 'Default paper type',
                         print_header_format   => 'Print header format',                          print_header_format   => 'Print header format',
                         disableexampointprint => 'Disable automatically printing point values on exams',                          disableexampointprint => 'Disable automatically printing point values on exams',
                           canuse_pdfforms    => 'Users can print problems as PDF forms and upload later for grading',
                                 },                                  },
                   },                    },
         'spreadsheet' =>          'spreadsheet' =>
Line 365  sub print_config_box { Line 366  sub print_config_box {
     my $itemtext = $item->{'itemtext'};      my $itemtext = $item->{'itemtext'};
     my $rowtotal = 0;      my $rowtotal = 0;
     my $output =      my $output =
          '<table class="LC_nested_outer">          '<h3><a href="#">'.&mt($item->{text}).'</a></h3>
           <tr>          <div>&nbsp;<span style="float:right">'.
            <th align="left" valign="middle"><span class="LC_font_larger">'.           &Apache::loncommon::help_open_topic($item->{'help'}).'</span>';
            &mt($item->{text}).'&nbsp;'.  
            &Apache::loncommon::help_open_topic($item->{'help'}).'</span></th>'."\n".  
           '</tr>';  
     if (($action eq 'feedback') || ($action eq 'classlists')) {      if (($action eq 'feedback') || ($action eq 'classlists')) {
         $output .= '          $output .= '
           <tr>  
            <td>  
             <table class="LC_nested">              <table class="LC_nested">
              <tr class="LC_info_row">               <tr class="LC_info_row">
               <td class="LC_left_item">'.&mt($item->{'header'}->[0]->{'col1'}).'</td>                <td class="LC_left_item">'.&mt($item->{'header'}->[0]->{'col1'}).'</td>
Line 388  sub print_config_box { Line 384  sub print_config_box {
         }          }
         $output .= '          $output .= '
            </table>             </table>
           </td>  
          </tr>  
          <tr>  
            <td>  
             <table class="LC_nested">              <table class="LC_nested">
              <tr class="LC_info_row">               <tr class="LC_info_row">
               <td class="LC_left_item">'.&mt($item->{'header'}->[1]->{'col1'}).'</td>';                <td class="LC_left_item">'.&mt($item->{'header'}->[1]->{'col1'}).'</td>';
Line 402  sub print_config_box { Line 394  sub print_config_box {
             $output .= &print_classlists('middle',$cdom,$settings,$itemtext,\$rowtotal,$crstype).              $output .= &print_classlists('middle',$cdom,$settings,$itemtext,\$rowtotal,$crstype).
                        '                         '
             </table>              </table>
            </td>  
           </tr>  
           <tr>  
            <td>  
             <table class="LC_nested">              <table class="LC_nested">
              <tr class="LC_info_row">               <tr class="LC_info_row">
               <td class="LC_left_item" valign="top">'.&mt($item->{'header'}->[2]->{'col1'}).'</td>                <td class="LC_left_item" valign="top">'.&mt($item->{'header'}->[2]->{'col1'}).'</td>
Line 414  sub print_config_box { Line 402  sub print_config_box {
         }          }
     } else {      } else {
         $output .= '          $output .= '
           <tr>  
            <td>  
             <table class="LC_nested">              <table class="LC_nested">
              <tr class="LC_info_row">               <tr class="LC_info_row">
               <td class="LC_left_item" valign="top">'.&mt($item->{'header'}->[0]->{'col1'}).'</td>                <td class="LC_left_item" valign="top">'.&mt($item->{'header'}->[0]->{'col1'}).'</td>
Line 448  sub print_config_box { Line 434  sub print_config_box {
     }      }
     $output .= '      $output .= '
    </table>     </table>
   </td>  </div>';
  </tr>  
 </table><br />';  
     return ($output,$rowtotal);      return ($output,$rowtotal);
 }  }
   
Line 985  sub store_changes { Line 969  sub store_changes {
                                     if (defined($yesno{$key})) {                                      if (defined($yesno{$key})) {
                                         $displayval = &mt('No');                                          $displayval = &mt('No');
                                         if ($changes->{$item}{$key} eq 'yes') {                                          if ($changes->{$item}{$key} eq 'yes') {
                                             $displayval = &mt('Yes');                                                       $displayval = &mt('Yes');                          
                                         }                                          }
                                     } elsif (($key =~ /^default_enrollment_(start|end)_date$/) && ($displayval)) {                                      } elsif (($key =~ /^default_enrollment_(start|end)_date$/) && ($displayval)) {
                                         $displayval = &Apache::lonlocal::locallocaltime($displayval);                                          $displayval = &Apache::lonlocal::locallocaltime($displayval);
                                     } elsif ($key eq 'categories') {                                      } elsif ($key eq 'categories') {
                                         $displayval = $env{'form.categories_display'};                                          $displayval = $env{'form.categories_display'};
                                     }                                        } elsif ($key eq 'canuse_pdfforms') {
                                           if ($changes->{$item}{$key} eq '1') {
                                               $displayval = &mt('Yes');
                                           } elsif ($changes->{$item}{$key} eq '0') {
                                               $displayval = &mt('No');
                                           }
                                       }
                                     if ($changes->{$item}{$key} eq '') {                                      if ($changes->{$item}{$key} eq '') {
                                         push(@delkeys,$key);                                          push(@delkeys,$key);
                                         $output .= '<li>'.&mt('Deleted setting for [_1]',                                          $output .= '<li>'.&mt('Deleted setting for [_1]',
Line 1037  sub store_changes { Line 1027  sub store_changes {
                     $output .= &mt('An error occurred when removing course settings which are no longer in use.');                      $output .= &mt('An error occurred when removing course settings which are no longer in use.');
                 }                  }
                 $output .= '</span>';                  $output .= '</span>';
             }              } else {
         } else {                  foreach my $key (@delkeys) {
             foreach my $key (@delkeys) {                      &Apache::lonnet::delenv('course.'.$cdom.'_'.$cnum.'.'.$key);
                 &Apache::lonnet::delenv('course.'.$cdom.'_'.$cnum.'.'.$key);                  }
             }              }
         }          }
         if (@need_env_update) {          if (@need_env_update) {
Line 1642  sub print_localization { Line 1632  sub print_localization {
     }      }
     my %items = (      my %items = (
         languages => {          languages => {
                         text => &mt($itemtext->{'languages'}).'<br />'.                          text => '<b>'.&mt($itemtext->{'languages'}).'</b><br />'.
                                 &mt("(will override user's preference)"),                                  &mt("(overrides individual user preference)"),
                         input => 'selectbox',                          input => 'selectbox',
                      },                        }, 
         timezone => {          timezone => {
                         text  => &mt($itemtext->{'timezone'}),                          text  => '<b>'.&mt($itemtext->{'timezone'}).'</b>',
                         input => 'selectbox',                          input => 'selectbox',
                     },                      },
         datelocale  => {           datelocale  => { 
                          text => &mt($itemtext->{'datelocale'}),                           text => '<b>'.&mt($itemtext->{'datelocale'}).'</b>',
                          input => 'selectbox',                           input => 'selectbox',
                        },                         },
     );      );
Line 1760  sub print_feedback { Line 1750  sub print_feedback {
     my %sections = &Apache::loncommon::get_sections($cdom,$cnum);      my %sections = &Apache::loncommon::get_sections($cdom,$cnum);
     my @sections = sort( { $a <=> $b } keys(%sections));      my @sections = sort( { $a <=> $b } keys(%sections));
     my %lt = &Apache::lonlocal::texthash (      my %lt = &Apache::lonlocal::texthash (
                                            currone  => 'Current recipient:',                                             currone => 'Current recipient:',
                                            currmult => 'Current recipients:',                                             curmult => 'Current recipients:',
                                            add      => 'Additional recipient:',                                             add     => 'Additional recipient:',
                                            del      => 'Delete?',                                             del     => 'Delete?',
                                            sec      => 'Sections:',                                             sec     => 'Sections:',
                                          );                                           );
   
     foreach my $item (@{$ordered}) {      foreach my $item (@{$ordered}) {
Line 1825  sub user_table { Line 1815  sub user_table {
         if ($num) {          if ($num) {
             $output .= '<tr>'.              $output .= '<tr>'.
                        '<td align="left"><i>';                         '<td align="left"><i>';
             if ($num == 1) {              if ($num > 1) {
                 $output .= $lt->{'currone'};                  $output .= $lt->{'currone'};
             } else {              } else {
                 $output .= $lt->{'currmult'};                  $output .= $lt->{'currmult'};
Line 1945  sub print_discussion { Line 1935  sub print_discussion {
     my %sections = &Apache::loncommon::get_sections($cdom,$cnum);      my %sections = &Apache::loncommon::get_sections($cdom,$cnum);
     my @sections = sort( { $a <=> $b } keys(%sections));      my @sections = sort( { $a <=> $b } keys(%sections));
     my %lt = &Apache::lonlocal::texthash (      my %lt = &Apache::lonlocal::texthash (
                                           currone  => 'Disallowed:',                                            currone => 'Disallowed:',
                                           currmult => 'Disallowed:',                                            curmult => 'Disallowed:',
                                           add      => 'Disallow more:',                                            add     => 'Disallow more:',
                                           del      => 'Delete?',                                            del     => 'Delete?',
                                           sec      => 'Sections:',                                            sec     => 'Sections:',
                                          );                                           );
   
     foreach my $item (@{$ordered}) {      foreach my $item (@{$ordered}) {
Line 2233  sub print_grading { Line 2223  sub print_grading {
                  },                   },
         'rndseed' => {          'rndseed' => {
                    text => '<b>'.&mt($itemtext->{'rndseed'}).'</b>'.                     text => '<b>'.&mt($itemtext->{'rndseed'}).'</b>'.
                            '<span class="LC_error">'.'<br />'.                             '<span class="LC_warning">'.'<br />'.
                            &mt('Modifying this will make problems have different numbers and answers!').                             &mt('Modifying this will make problems have different numbers and answers!').
                            '</span>',                             '</span>',
                    input => 'selectbox',                     input => 'selectbox',
Line 2305  sub print_printouts { Line 2295  sub print_printouts {
             text => '<b>'.&mt($itemtext->{'disableexampointprint'}).'</b>',              text => '<b>'.&mt($itemtext->{'disableexampointprint'}).'</b>',
             input => 'radio',              input => 'radio',
                                  },                                   },
           canuse_pdfforms => {
               text  => '<b>'.&mt($itemtext->{'canuse_pdfforms'}).'</b>',
               input => 'selectbox',
               options => {
                            1    => &mt('Yes'),
                            0    => &mt('No'),
                          },
               order => ['1','0'],
               nullval => 'None specified - use domain default',
                       }
     );      );
     return &make_item_rows($cdom,\%items,$ordered,$settings,$rowtotal,$crstype);      return &make_item_rows($cdom,\%items,$ordered,$settings,$rowtotal,$crstype);
 }  }
Removed from v.1.8.2.6  
changed lines
  Added in v.1.17

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