--- loncom/interface/loncoursequeueadmin.pm 2021/06/20 18:37:35 1.52.2.3.2.4 +++ loncom/interface/loncoursequeueadmin.pm 2023/07/09 17:35:52 1.52.2.5.2.2 @@ -1,7 +1,7 @@ # The LearningOnline Network # Utilities to administer domain course requests and course self-enroll requests # -# $Id: loncoursequeueadmin.pm,v 1.52.2.3.2.4 2021/06/20 18:37:35 raeburn Exp $ +# $Id: loncoursequeueadmin.pm,v 1.52.2.5.2.2 2023/07/09 17:35:52 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1710,6 +1710,8 @@ sub build_batchcreatehash { my %clonedfrom = &Apache::lonnet::coursedescription($details->{'clonedom'}.'_'.$details->{'clonecrs'}); $batchhash{'textbook'} = $clonedfrom{'description'}; } + } elsif ($details->{'crstype'} eq 'lti') { + $batchhash{'lti'} = 1; } $batchhash{'crstype'} = 'Course'; } @@ -2119,7 +2121,7 @@ sub process_official_reqs { my ($result,$postprocess) = &course_creation($dom,$cnum,'domain',$history{'details'},\$logmsg,$clonemsg,\$newusermsg, \$addresult,\$enrollcount,\$response,\$keysmsg,\%domdefs,\%longroles, - \$code,\%customitems,$context,$user_lh); + \$code,\%customitems,$context,$user_lh); if ($result eq 'created') { $disposition = 'created'; $reqstatus = 'created';