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

Diff for /loncom/interface/loncreatecourse.pm between versions 1.127 and 1.128

version 1.127, 2009/09/28 19:21:38 version 1.128, 2009/10/02 18:31:36
Line 982  sub print_creation_logs { Line 982  sub print_creation_logs {
                    '<th>'.&mt('Course Owner(s)').'</th>';                     '<th>'.&mt('Course Owner(s)').'</th>';
     if (($curr{'type'} eq 'official') || ($curr{'type'} eq 'any')) {      if (($curr{'type'} eq 'official') || ($curr{'type'} eq 'any')) {
        $tablehdr .= '<th>'.&mt('Institutional Code').'</th>';         $tablehdr .= '<th>'.&mt('Institutional Code').'</th>';
     }       }
     $tablehdr .= '<th>'.&mt('Course Type').'</th>'.      if ($curr{'type'} eq 'any') { 
                  '<th>'.&mt('Creation Context').'</th>'.          $tablehdr .= '<th>'.&mt('Course Type').'</th>';
                  &Apache::loncommon::end_data_table_header_row();      }
       if ($curr{'context'} eq 'any')
           $tablehdr .= '<th>'.&mt('Creation Context').'</th>';
       }
       $tablehdr .= &Apache::loncommon::end_data_table_header_row();
     my ($minshown,$maxshown);      my ($minshown,$maxshown);
     $minshown = 1;      $minshown = 1;
     my $count = 0;      my $count = 0;
Line 1106  sub print_creation_logs { Line 1110  sub print_creation_logs {
         if (($curr{'type'} eq 'official') || ($curr{'type'} eq 'any')) {          if (($curr{'type'} eq 'official') || ($curr{'type'} eq 'any')) {
             $r->print('<td>'.$courses{$cid}{'inst_code'}.'</td>');              $r->print('<td>'.$courses{$cid}{'inst_code'}.'</td>');
         }          }
         $r->print('<td>'.$showtype.'</td><td>'.$showcontext.'</td><td>'.&Apache::loncommon::end_data_table_row()."\n");          if ($curr{'type'} eq 'any') {
               $r->print('<td>'.$showtype.'</td>');
           }
           if ($curr{'context'} eq 'any') {
               $r->print('<td>'.$showcontext.'</td>');
           }
           $r->print('<td>'.&Apache::loncommon::end_data_table_row()."\n");
     }      }
     if ($showntablehdr) {      if ($showntablehdr) {
         $r->print(&Apache::loncommon::end_data_table().'<br />');          $r->print(&Apache::loncommon::end_data_table().'<br />');
Line 1241  sub course_types { Line 1251  sub course_types {
 }  }
   
 sub context_names {  sub context_names {
     my @contexts = qw(auto web dc_create requestcrs);      my @contexts = qw(auto web dc_create requestcourses);
     my %contextnames =       my %contextnames = 
         &Apache::lonlocal::texthash (          &Apache::lonlocal::texthash (
                             auto       => 'Automated creation from batch file',                          auto           => 'Automated creation from batch file',
                             web        => 'Batch creation from uploaded file',                          web            => 'Batch creation from uploaded file',
                             dc_create  => 'Single course created by Domain Coordinator',                           dc_create      => 'Single course created by Domain Coordinator', 
                             requestcrs => 'Processing of submitted course request',                          requestcourses => 'Processing of submitted course request',
         );          );
     return (\@contexts,\%contextnames);      return (\@contexts,\%contextnames);
 }  }
Removed from v.1.127  
changed lines
  Added in v.1.128

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