--- loncom/enrollment/Enrollment.pm	2005/04/27 19:11:33	1.23
+++ loncom/enrollment/Enrollment.pm	2005/08/31 06:21:58	1.24
@@ -1,5 +1,5 @@
 # Automated Enrollment manager
-# $Id: Enrollment.pm,v 1.23 2005/04/27 19:11:33 raeburn Exp $
+# $Id: Enrollment.pm,v 1.24 2005/08/31 06:21:58 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -459,7 +459,7 @@ sub create_newuser {
         if ($context eq 'createowner' || $context eq 'createcourse') {
             my $result = &Apache::lonnet::modifyuser($udom,$uname,$pid,$auth,$authparam,$first,$middle,$last,$gene,'1',undef,$emailaddr);
             if ($result eq 'ok' && $context eq 'createcourse') {
-                $outcome = &Apache::loncreateuser::commit_standardrole($userurl,$role,$cdom,$crs,$start,$end);
+                $outcome = &Apache::loncreateuser::commit_standardrole($udom,$uname,$userurl,$role,$start,$end,$cdom,$crs,$usec);
                 unless ($outcome =~ /^Error:/) {
                     $outcome = 'ok';
                 }