version 1.90, 2015/06/14 00:02:43
|
version 1.91, 2015/06/22 14:27:13
|
Line 3730 sub process_request {
|
Line 3730 sub process_request {
|
} |
} |
$reqhash{'disposition'} = $disposition; |
$reqhash{'disposition'} = $disposition; |
$reqstatus = $disposition; |
$reqstatus = $disposition; |
my ($modified,$queued,$coursedesc,$token,%customitems); |
my ($modified,$queued,$token,%customitems); |
unless ($disposition eq 'rejected') { |
unless ($disposition eq 'rejected') { |
my $inprocess = &Apache::lonnet::auto_crsreq_update($dom,$cnum,$crstype,'process',$env{'user.name'}, |
my $inprocess = &Apache::lonnet::auto_crsreq_update($dom,$cnum,$crstype,'process',$env{'user.name'}, |
$env{'user.domain'},$fullname,$coursedesc,undef, |
$env{'user.domain'},$fullname,$coursedesc,undef, |