Commit 82d87bdb authored by Leigh Stoller's avatar Leigh Stoller

Back out Rob's last change to mkgroup and move to mkproj since required

ordering of events is not obvious to anyone except me (on a good day).
parent 589e97d2
......@@ -215,19 +215,10 @@ foreach my $tipserver ( TBTipServers() ) {
}
#
# Create the group directory if it does not already exist - for default groups,
# though, we just link to the /proj drectory
# Create the group directory if it does not already exist, but not for
# the default group of the project.
#
if ($pid eq $gid) {
if (! -e $groupdir) {
print "Linking default group directory: $groupdir.\n";
my $projdir = "$PROJROOT/$pid";
if (system("ln -s $projdir $groupdir")) {
fatal("Could not link group directory $projdir to $groupdir");
}
}
} else {
if ($pid ne $gid) {
if (! -e $groupdir) {
print "Creating group directory: $groupdir.\n";
......
......@@ -200,6 +200,13 @@ if (! -e "$GRPROOT/$pid") {
if (! chown($uid, $gid, "$GRPROOT/$pid")) {
fatal("Could not chown $GRPROOT/$pid to $uid/$gid: $!");
}
# Create a group link for the default group.
if (! -e "$GRPROOT/$pid/$pid") {
if (system("ln -s $PROJROOT/$pid $GRPROOT/$pid/$pid")) {
fatal("Could not symlink $PROJROOT/$pid to $GRPROOT/$pid/$pid");
}
}
}
#
......
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