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

Diff for /loncom/interface/courseprefs.pm between versions 1.23 and 1.24

version 1.23, 2010/02/21 00:47:02 version 1.24, 2010/02/21 16:02:09
Line 272  sub handler { Line 272  sub handler {
                 gens => 'General community settings',                  gens => 'General community settings',
                 idnu => 'Community ID or number',                  idnu => 'Community ID or number',
                 desc => 'Community Description',                  desc => 'Community Description',
                   ownr => 'Community Owner',
                 catg => 'Categorize community',                  catg => 'Categorize community',
                 excc => 'Exclude from community catalog',                  excc => 'Exclude from community catalog',
                 clon => 'Users allowed to clone community',                  clon => 'Users allowed to clone community',
Line 297  sub handler { Line 298  sub handler {
                 gens => 'General course settings',                  gens => 'General course settings',
                 idnu => 'Course ID or number',                  idnu => 'Course ID or number',
                 desc => 'Course Description',                  desc => 'Course Description',
                   ownr => 'Course Owner',
                 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',
Line 340  sub handler { Line 342  sub handler {
         'courseinfo' =>          'courseinfo' =>
                    { text => $lt{'gens'},                     { text => $lt{'gens'},
                      help => 'Course_Environment',                       help => 'Course_Environment',
                      ordered => ['description','courseid','categories',                       ordered => ['owner','description','courseid','categories',
                                  'hidefromcat','externalsyllabus',                                   'hidefromcat','externalsyllabus',
                                  'cloners','url','rolenames'],                                   'cloners','url','rolenames'],
                      itemtext => {                       itemtext => {
                                      owner            => $lt{'ownr'},
                                    description      => $lt{'desc'},                                     description      => $lt{'desc'},
                                    courseid         => $lt{'idnu'},                                     courseid         => $lt{'idnu'},
                                    categories       => $lt{'catg'},                                     categories       => $lt{'catg'},
Line 1515  sub print_courseinfo { Line 1518  sub print_courseinfo {
                    input => 'textbox',                     input => 'textbox',
                    size  => '25',                     size  => '25',
                           },                            },
           'owner'        => {
                      text => '<b>'.&mt($itemtext->{'owner'}).'</b>',
                             },
         'courseid'     => {           'courseid'     => { 
                    text => '<b>'.&mt($itemtext->{'courseid'}).'</b><br />'.'('.                     text => '<b>'.&mt($itemtext->{'courseid'}).'</b><br />'.'('.
                            &mt('internal, optional').')',                             &mt('internal, optional').')',
Line 1523  sub print_courseinfo { Line 1529  sub print_courseinfo {
                           },                            },
         'cloners'      => {           'cloners'      => { 
                    text => '<b>'.&mt($itemtext->{'cloners'}).'</b><br />'.                     text => '<b>'.&mt($itemtext->{'cloners'}).'</b><br />'.
                            &mt('Coordinators included automatically'),                             &mt('Owner and Coordinators included automatically'),
                    input => 'textbox',                     input => 'textbox',
                    size  => '40',                     size  => '40',
                    advanced => 1                     advanced => 1
Line 1679  sub print_courseinfo { Line 1685  sub print_courseinfo {
             $datatable .= '<input type="hidden" name="categories" value="'.$settings->{$item}.'" />'.              $datatable .= '<input type="hidden" name="categories" value="'.$settings->{$item}.'" />'.
                           &Apache::lonhtmlcommon::textbox($item.'_display',$settings->{$item},                            &Apache::lonhtmlcommon::textbox($item.'_display',$settings->{$item},
                                                           $items{$item}{size},$launcher);                                                            $items{$item}{size},$launcher);
           } elsif ($item eq 'owner') {
               my $owner = $env{'course.'.$env{'request.course.id'}.'.internal.courseowner'};
               if ($owner =~ /:/) {
                   my ($ownername,$ownerdom) = split(':',$owner); 
                   $owner = &Apache::loncommon::plainname($ownername,$ownerdom);
               } elsif ($owner ne '') {
                   $owner = &Apache::loncommon::plainname($owner,$cdom);
               } else {
                   $owner = &mt('None specified');
               }
               my $domdesc = &Apache::lonnet::domain($cdom,'description');
               $datatable .= $owner;
         } else {          } else {
             $datatable .= &Apache::lonhtmlcommon::textbox($item,$settings->{$item},$items{$item}{size});              $datatable .= &Apache::lonhtmlcommon::textbox($item,$settings->{$item},$items{$item}{size});
         }          }
Removed from v.1.23  
changed lines
  Added in v.1.24

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