Commit 944ef906 authored by Leigh B Stoller's avatar Leigh B Stoller

Bug fix.

parent 7fa7f848
...@@ -190,7 +190,7 @@ if (defined($project) && ...@@ -190,7 +190,7 @@ if (defined($project) &&
# And then instantiate the user. # And then instantiate the user.
system("$TBACCT add $usr_uid"); system("$TBACCT add $usr_uid");
if ($?) { if ($?) {
$project->DeleteMemberShip($user) $project->GetProjectGroup()->DeleteMemberShip($user)
if (defined($project)); if (defined($project));
$user->Delete(); $user->Delete();
fatal("Could not instantiate user account!") fatal("Could not instantiate user account!")
...@@ -201,7 +201,7 @@ if ($?) { ...@@ -201,7 +201,7 @@ if ($?) {
my $certpass = substr(lc(emutil::GenHash()), 0, 10); my $certpass = substr(lc(emutil::GenHash()), 0, 10);
system("$MKUSERCERT -p $certpass $usr_uid"); system("$MKUSERCERT -p $certpass $usr_uid");
if ($?) { if ($?) {
$project->DeleteMemberShip($user) $project->GetProjectGroup()->DeleteMemberShip($user)
if (defined($project)); if (defined($project));
$user->Delete(); $user->Delete();
fatal("Could not create local SSL certificate"); fatal("Could not create local SSL certificate");
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment