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

Diff for /loncom/interface/courseprefs.pm between versions 1.56 and 1.61

version 1.56, 2013/04/11 15:30:37 version 1.61, 2013/11/23 20:33:58
Line 288  sub handler { Line 288  sub handler {
                 stuv => 'Member-viewable membership list options',                  stuv => 'Member-viewable membership list options',
                 stul => 'Member agreement needed to be listed',                  stul => 'Member agreement needed to be listed',
                 clas => 'Membership and facilitator listing',                  clas => 'Membership and facilitator listing',
                 priv => 'Privileged users (Domain Coordinators) in facilitator listing',                  prus => 'Privileged users (Domain Coordinators) in facilitator listing',
                 defc => 'Default Community Spreadsheet',                  defc => 'Default Community Spreadsheet',
                 defs => 'Default User Spreadsheet',                  defs => 'Default User Spreadsheet',
                 seme => 'Send message to member when clicking Done on Tasks'                  seme => 'Send message to member when clicking Done on Tasks'
Line 316  sub handler { Line 316  sub handler {
                 stuv => 'Student-viewable classlist options',                  stuv => 'Student-viewable classlist options',
                 stul => 'Student agreement needed to be listed',                  stul => 'Student agreement needed to be listed',
                 clas => 'Classlists and staff listing',                  clas => 'Classlists and staff listing',
                 priv => 'Privileged users (Domain Coordinators) in staff listing',                  prus => 'Privileged users (Domain Coordinators) in staff listing',
                 prdo => "Domains to check for privileged users (besides course's domain)",                  prdo => "Domains to check for privileged users (besides course's domain)",
                 defc => 'Default Course Spreadsheet',                  defc => 'Default Course Spreadsheet',
                 defs => 'Default Student Spreadsheet',                  defs => 'Default Student Spreadsheet',
Line 367  sub handler { Line 367  sub handler {
                                    'categories'       => $lt{'catg'},                                     'categories'       => $lt{'catg'},
                                    'hidefromcat'      => $lt{'excc'},                                     'hidefromcat'      => $lt{'excc'},
                                    'cloners'          => $lt{'clon'},                                      'cloners'          => $lt{'clon'}, 
                                    'externalsyllabus' => 'URL of Syllabus',                                     'externalsyllabus' => 'Syllabus status',
                                    'url'              => 'Top Level Map',                                     'url'              => 'Top Level Map',
                                    'rolenames'        => $lt{'rept'},                                     'rolenames'        => $lt{'rept'},
                                    'loncaparev'       => $lt{'lcrv'},                                     'loncaparev'       => $lt{'lcrv'},
Line 431  sub handler { Line 431  sub handler {
                      itemtext => {                       itemtext => {
                          default_enrollment_start_date => 'Start date',                           default_enrollment_start_date => 'Start date',
                          default_enrollment_end_date   => 'End date',                           default_enrollment_end_date   => 'End date',
                          nothideprivileged             => $lt{'priv'},                           nothideprivileged             => $lt{'prus'},
                          checkforpriv                  => $lt{'prdo'},                           checkforpriv                  => $lt{'prdo'},
                          student_classlist_view        => $lt{'stuv'},                           student_classlist_view        => $lt{'stuv'},
                          student_classlist_opt_in      => $lt{'stul'},                           student_classlist_opt_in      => $lt{'stul'},
Line 1694  function loncaparevinfo() { Line 1694  function loncaparevinfo() {
 }  }
 ENDSCRIPT  ENDSCRIPT
     }      }
       my $cnum = $env{'course.'.$cid.'.num'};
       my $syllabus_js = <<ENDSCRIPT;
   function syllabusinfo() {
       var syllwin = null;
       var url = '/public/$cdom/$cnum/syllabus?only_body=1';
       if (!syllwin || syllwin.closed) {
           syllwin=window.open(url,'syllabuswin','height=480,width=600,resizable=yes,scrollbars=yes,location=no,menubar=no,toolbar=no');
       } else {
           syllwin.focus();
       }
   }
   ENDSCRIPT
     $jscript = '<script type="text/javascript" language="Javascript">'."\n".      $jscript = '<script type="text/javascript" language="Javascript">'."\n".
                '// <![CDATA['."\n".                   '// <![CDATA['."\n".  
                $browse_js."\n".$categorize_js."\n".$loncaparev_js."\n".                 $browse_js."\n".$categorize_js."\n".$loncaparev_js."\n".
                $cloners_js."\n".'// ]]>'."\n".                 $cloners_js."\n".
                  $syllabus_js."\n".'//]]>'."\n".
                '</script>'."\n".$stubrowse_js."\n";                 '</script>'."\n".$stubrowse_js."\n";
     return $jscript;      return $jscript;
 }  }
Line 1808  sub print_courseinfo { Line 1821  sub print_courseinfo {
     }      }
   
     my ($can_toggle_cat,$can_categorize) = &can_modify_catsettings($cdom,$crstype);      my ($can_toggle_cat,$can_categorize) = &can_modify_catsettings($cdom,$crstype);
       my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};
   
     my $replace;      my $replace;
     if ($crstype eq 'Community') {      if ($crstype eq 'Community') {
Line 1858  sub print_courseinfo { Line 1872  sub print_courseinfo {
                    advanced => 1                     advanced => 1
                         },                          },
         'externalsyllabus' => {          'externalsyllabus' => {
                    text => '<b>'.&mt($itemtext->{'externalsyllabus'}).'</b><br />('.                     text => '<b>'.&mt($itemtext->{'externalsyllabus'}).'</b><br />'.
                            &mt('not using syllabus template)'),                             &mt('(Syllabus type in use)').('&nbsp;' x2).
                    input => 'textbox',                             &mt('[_1]Edit[_2]','<a href="/public/'.$cdom.'/'.$cnum.'/syllabus?forceedit=1">',
                    size  => '40',                                 '</a>'),
                         },                          },
         'hidefromcat' => {          'hidefromcat' => {
                    text => '<b>'.&mt($itemtext->{'hidefromcat'}).'</b><br />'.                     text => '<b>'.&mt($itemtext->{'hidefromcat'}).'</b><br />'.
Line 2025  sub print_courseinfo { Line 2039  sub print_courseinfo {
             }              }
             $datatable .= $owner;              $datatable .= $owner;
         } elsif ($item eq 'co-owners') {          } elsif ($item eq 'co-owners') {
             my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};  
             my $coowners = $env{'course.'.$env{'request.course.id'}.'.internal.co-owners'};              my $coowners = $env{'course.'.$env{'request.course.id'}.'.internal.co-owners'};
             my @currcoown;              my @currcoown;
             if ($coowners) {              if ($coowners) {
Line 2044  sub print_courseinfo { Line 2057  sub print_courseinfo {
                     $datatable .= &manage_coownership($cnum,$cdom,@currcoown);                      $datatable .= &manage_coownership($cnum,$cdom,@currcoown);
                 }                  }
             }              }
           } elsif ($item eq 'externalsyllabus') {
               my $external = $env{'course.'.$env{'request.course.id'}.'.externalsyllabus'};
               my $uploaded = $env{'course.'.$env{'request.course.id'}.'.uploadedsyllabus'};
               my $minimal =  $env{'course.'.$env{'request.course.id'}.'.minimalsyllabus'};
               if (($minimal =~/\w/) || ($uploaded =~/\w/)) {
                   if ($minimal =~/\w/) {
                       if ($external =~ m{\Q$minimal\E$}) {
                           undef($external);
                       }
                   } elsif ($uploaded =~/\w/) {
                       if ($external =~ m{\Q$uploaded\E$}) {
                           undef($external);
                       }
                   }
               } elsif ($external!~/\w/) {
                   undef($external);
               }
               if ($external) {
                   $datatable .= &mt('External URL');
               } elsif ($minimal) {
                   $datatable .= &mt('Minimal template');
               } elsif ($uploaded) {
                   $datatable .= &mt('Uploaded file');
               } else {
                   $datatable .= &mt('Standard template'); 
               }
               $datatable .= ('&nbsp;' x 2).
                             &mt('[_1]View[_2]',
                                 '<a href="javascript:syllabusinfo();">',
                                 '</a>'); 
         } elsif ($item eq 'loncaparev') {          } elsif ($item eq 'loncaparev') {
             my $loncaparev = $env{'course.'.$env{'request.course.id'}.'.internal.releaserequired'};              my $loncaparev = $env{'course.'.$env{'request.course.id'}.'.internal.releaserequired'};
             my $showreqd;              my $showreqd;
Line 2239  sub display_loncaparev_constraints { Line 2282  sub display_loncaparev_constraints {
                 if ($key =~ /(\Q$item\E)$/) {                  if ($key =~ /(\Q$item\E)$/) {
                      if (ref($checkparms{$item}) eq 'ARRAY') {                       if (ref($checkparms{$item}) eq 'ARRAY') {
                          my $value = $resourcedata->{$key};                           my $value = $resourcedata->{$key};
                            if ($item eq 'examcode') {
                                if (&Apache::lonnet::validCODE($value)) {
                                    $value = 'valid';
                                } else {
                                    $value = '';
                                }
                            }
                          my ($middle,$scope,$which,$level,$map,$resource);                           my ($middle,$scope,$which,$level,$map,$resource);
                          if (grep(/^\Q$value\E$/,@{$checkparms{$item}})) {                           if (grep(/^\Q$value\E$/,@{$checkparms{$item}})) {
                              my $stdtype = &Apache::lonparmset::standard_parameter_types($item);                               my $stdtype = &Apache::lonparmset::standard_parameter_types($item);
Line 2484  sub show_contents_view { Line 2534  sub show_contents_view {
                   '<th>'.&mt('Attribute/Setting').'</th>'.                    '<th>'.&mt('Attribute/Setting').'</th>'.
                   &Apache::loncommon::end_data_table_header_row().                    &Apache::loncommon::end_data_table_header_row().
                   &Apache::loncommon::start_data_table_row().                    &Apache::loncommon::start_data_table_row().
                   '<td>&nbsp;'.$icon.'&nbsp;'.&mt('Main Course Documents').'</td>');                    '<td>&nbsp;'.$icon.'&nbsp;'.&mt('Main Content').'</td>');
                   &releases_by_map($r,$bymap,$topmap,$scopeorder,$lt);                    &releases_by_map($r,$bymap,$topmap,$scopeorder,$lt);
                   $r->print(&Apache::loncommon::end_data_table_row());                    $r->print(&Apache::loncommon::end_data_table_row());
         my $it=$navmap->getIterator(undef,undef,undef,1,1,undef);          my $it=$navmap->getIterator(undef,undef,undef,1,1,undef);
Line 3460  sub print_appearance { Line 3510  sub print_appearance {
                    text => '<b>'.&mt($itemtext->{'texengine'}).'</b>',                     text => '<b>'.&mt($itemtext->{'texengine'}).'</b>',
                    input => 'selectbox',                     input => 'selectbox',
                    options => {                     options => {
                                   MathJax  => 'MathJax',
                                 jsMath   => 'jsMath',                                  jsMath   => 'jsMath',
                                 mimetex => &mt('Convert to Images'),                                  mimetex => &mt('Convert to Images'),
                                 tth      => &mt('TeX to HTML'),                                  tth      => &mt('TeX to HTML'),
                               },                                },
                    order  => ['jsMath','mimetex','tth'],                     order  => ['MathJax','jsMath','mimetex','tth'],
                    nullval => $mathdef,                     nullval => $mathdef,
                  },                   },
         'tthoptions' => {          'tthoptions' => {
Removed from v.1.56  
changed lines
  Added in v.1.61

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