approveproject.php3: Add in call to SUEXEC(mkacct-ctrl project headuid);

approveuser.php3: Add in call to SUEXEC(mkacct-ctrl project user );

www/approveproject.php3

@@ -231,6 +231,11 @@ elseif (strcmp($approval, "approve") == 0) {
     # Create the project directory. If it fails, we will find out about it.
     #
     SUEXEC($uid, "flux", "mkprojdir_wrapper $pid", 0);
+
+    #
+    # Create the user accounts. 
+    # 
+    SUEXEC($uid, "flux", "mkacct-ctrl $pid $headuid", 0);	 	
 	
     echo "<h3><p>
               Project $pid (User: $headuid) has been approved.

www/approveuser.php3

@@ -217,6 +217,11 @@ while (list ($header, $value) = each ($HTTP_POST_VARS)) {
              "Cc: $TBMAIL_CONTROL\n".
              "Errors-To: $TBMAIL_WWW");
 
+	#
+        # Create user account on control node.
+        #
+	SUEXEC($uid, "flux", "mkacct-ctrl $project $user", 0);
+
 	echo "<h3><p>
                   User $user was granted membership in project $project
                   with $newtrust permissions.