--- loncom/automation/Autocreate.pl	2019/07/26 02:28:28	1.21
+++ loncom/automation/Autocreate.pl	2020/07/01 20:09:03	1.22
@@ -2,7 +2,7 @@
 #
 # Automated Course Creation script
 #
-# $Id: Autocreate.pl,v 1.21 2019/07/26 02:28:28 raeburn Exp $
+# $Id: Autocreate.pl,v 1.22 2020/07/01 20:09:03 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -175,7 +175,7 @@ sub process_xml {
     closedir(DIR);
     my %courseids = ();
     print $fh "Sending to batch - auto,$dom,$dcname,$dcdom ".join(":",@requests)."\n";
-    my ($result,$logmsg,$keysmsg,$codesref,$instcodesref) =
+    my ($result,$logmsg,$clonemsg,$keysmsg,$codesref,$instcodesref) =
         &LONCAPA::batchcreatecourse::create_courses(\@requests,\%courseids,'auto',$dom,$dcname,$dcdom);
     my $outcome;
     if ($result ne '') {
@@ -187,6 +187,9 @@ sub process_xml {
     if ($keysmsg ne '') {
         $outcome .=  $keysmsg."\n";
     }
+    if ($clonemsg ne '') {
+        $outcome .= $clonemsg."\n";
+    }
     print $fh $outcome;
 
     my $output;
@@ -267,7 +270,7 @@ sub set_dc_env {
     $env{'user.home'} = &Apache::lonnet::homeserver($dcname,$dcdom);
     if ($defdom ne '') {
         $env{'request.role.domain'} = $defdom;
-    } 
+    }
     return;
 }