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

Diff for /loncom/interface/loncoursequeueadmin.pm between versions 1.31 and 1.33

version 1.31, 2012/08/15 14:37:13 version 1.33, 2013/01/02 01:15:26
Line 1470  sub get_processtype { Line 1470  sub get_processtype {
         } else {          } else {
             my %alltasks;              my %alltasks;
             if (($isadv) && ($settings{'_LC_adv'} ne '')) {              if (($isadv) && ($settings{'_LC_adv'} ne '')) {
                 $val = $settings{$crstype}{'_LC_adv'};                  $val = $settings{'_LC_adv'};
                 @{$inststatuses} = ('_LC_adv_');                  @{$inststatuses} = ('_LC_adv_');
             } else {              } else {
                 if ($userenv{'inststatus'} ne '') {                  if ($userenv{'inststatus'} ne '') {
Line 1556  sub queued_selfenrollment { Line 1556  sub queued_selfenrollment {
     }      }
     if (keys(%reqs_by_date)) {      if (keys(%reqs_by_date)) {
         unless ($notitle) {          unless ($notitle) {
             $output .= '<b>'.&mt('Enrollment requests pending Course Coordinator approval').'</b><br />';              $output .= '<br /><b>'.&mt('Enrollment requests pending Course Coordinator approval').'</b><br />';
         }          }
         $output .= &Apache::loncommon::start_data_table().          $output .= &Apache::loncommon::start_data_table().
                    &Apache::loncommon::start_data_table_header_row().                     &Apache::loncommon::start_data_table_header_row().
Line 1804  sub author_prompt { Line 1804  sub author_prompt {
     my ($is_active_author,$offer_author);      my ($is_active_author,$offer_author);
     if ($env{'environment.canrequest.author'}) {      if ($env{'environment.canrequest.author'}) {
         unless (&is_active_author()) {          unless (&is_active_author()) {
             if ($env{'environment.canrequest.author'}) {              unless (&reqauthor_check() =~ /^approval:\d+$/) {
                 unless (&reqauthor_check() =~ /^approval:\d+$/) {                  $offer_author = 1;
                     $offer_author = 1;  
                 }  
             }              }
         }          }
     }      }
Removed from v.1.31  
changed lines
  Added in v.1.33

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