--- loncom/automation/batchcreatecourse.pm	2007/08/23 21:54:37	1.23
+++ loncom/automation/batchcreatecourse.pm	2007/09/03 15:34:16	1.24
@@ -1,5 +1,5 @@
 #
-# $Id: batchcreatecourse.pm,v 1.23 2007/08/23 21:54:37 albertel Exp $
+# $Id: batchcreatecourse.pm,v 1.24 2007/09/03 15:34:16 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -499,6 +499,9 @@ sub build_course {
         }
         my ($success, $msg) = &Apache::loncommon::construct_course($courseargs,$logmsg,\$courseid,\$crsudom,\$crsunum,$udom,$uname,$context);
 	$$logmsg .= $msg;
+        if (!$success) {
+            return;
+        }
     } else {
         return;
     }