--- loncom/interface/loncreatecourse.pm	2003/12/11 02:42:38	1.44
+++ loncom/interface/loncreatecourse.pm	2004/01/19 23:05:52	1.45.2.1
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Create a course
 #
-# $Id: loncreatecourse.pm,v 1.44 2003/12/11 02:42:38 raeburn Exp $
+# $Id: loncreatecourse.pm,v 1.45.2.1 2004/01/19 23:05:52 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -558,7 +558,6 @@ ENDENHEAD
         foreach my $class (@affiliates) {
             my $addcheck =  &localenroll::new_course($class,$cenv{'internal.courseowner'});
             unless ($addcheck eq 'ok') {
-                print STDERR "$class - $cenv{'internal.courseowner'} - $addcheck\n"; 
                 push @badclasses, $class; 
             }
         }
@@ -686,6 +685,8 @@ ENDENHEAD
 	$r->print(
  '<p><a href="/adm/managekeys?cid='.$crsudom.'_'.$crsunum.'">Manage Access Keys</a></p>');
     }
+    # Flush the course logs so reverse user roles immediately updated
+    &Apache::lonnet::flushcourselogs();
     $r->print('<p>Roles will be active at next login.</p></body></html>');
 }