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

Diff for /loncom/interface/loncoursequeueadmin.pm between versions 1.32 and 1.35

version 1.32, 2012/08/16 17:02:55 version 1.35, 2013/03/01 04:48:59
Line 536  sub update_request_queue { Line 536  sub update_request_queue {
         $firsturl);          $firsturl);
     my $count=0;      my $count=0;
     while (my @course = &Apache::loncommon::get_env_multiple('form.'.$count.'radioreq')) {      while (my @course = &Apache::loncommon::get_env_multiple('form.'.$count.'radioreq')) {
         if (@course[0] =~ /^\d+:.*/) {          if ($course[0] =~ /^\d+:.*/) {
             push(@approvals,@course[0]);              push(@approvals,$course[0]);
         } elsif (@course[0] =~ /^later:.*/) {          } elsif ($course[0] =~ /^later:.*/) {
             #decide later              #decide later
         } else {          } else {
             push(@rejections,@course[0]);              push(@rejections,$course[0]);
         }          }
         $count+=1;          $count+=1;
     }      }
Line 1352  sub build_batchcreatehash { Line 1352  sub build_batchcreatehash {
         }          }
         $batchhash{'title'} = $details->{'cdescr'};          $batchhash{'title'} = $details->{'cdescr'};
         $batchhash{'coursecode'} = $details->{'instcode'};          $batchhash{'coursecode'} = $details->{'instcode'};
           if ($domdefs->{'officialcredits'} || $domdefs->{'unofficialcredits'}) {
               $batchhash{'defaultcredits'} = $details->{'defaultcredits'};
           }
         $batchhash{'emailenc'} = $emailenc;          $batchhash{'emailenc'} = $emailenc;
         $batchhash{'adds'} = $details->{'autoadds'};          $batchhash{'adds'} = $details->{'autoadds'};
         $batchhash{'drops'} = $details->{'autodrops'};          $batchhash{'drops'} = $details->{'autodrops'};
Line 1470  sub get_processtype { Line 1473  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 '') {
Removed from v.1.32  
changed lines
  Added in v.1.35

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