Commit ad87477e authored by Leigh Stoller's avatar Leigh Stoller

Do not create mailman lists for subgroups, when ELABINELAB=1

Creating the groups for main group is enough for testing.
parent 3be799df
......@@ -2,7 +2,7 @@
#
# EMULAB-COPYRIGHT
# Copyright (c) 2000-2005 University of Utah and the Flux Group.
# Copyright (c) 2000-2006 University of Utah and the Flux Group.
# All rights reserved.
#
use English;
......@@ -34,6 +34,7 @@ my $TBOPS = "@TBOPSEMAIL@";
my $TBLOGS = "@TBLOGSEMAIL@";
my $CONTROL = "@USERNODE@";
my $BOSSNODE = "@BOSSNODE@";
my $ELABINELAB = @ELABINELAB@;
my $MAILMANSUPPORT= @MAILMANSUPPORT@;
my $PROJROOT = "/proj";
my $GRPROOT = "/groups";
......@@ -264,7 +265,7 @@ if ($pid ne $gid) {
}
}
if ($MAILMANSUPPORT) {
if ($MAILMANSUPPORT && !$ELABINELAB) {
$UID = $SAVEUID;
$EUID = $UID;
system("$ADDMMLIST -a ${pid}-${gid}-users") == 0 or
......
......@@ -2,7 +2,7 @@
#
# EMULAB-COPYRIGHT
# Copyright (c) 2000-2005 University of Utah and the Flux Group.
# Copyright (c) 2000-2006 University of Utah and the Flux Group.
# All rights reserved.
#
......@@ -47,6 +47,7 @@ my $TB = "@prefix@";
my $TBOPS = "@TBOPSEMAIL@";
my $CONTROL = "@USERNODE@";
my $BOSSNODE = "@BOSSNODE@";
my $ELABINELAB = @ELABINELAB@;
my $MAILMANSUPPORT= @MAILMANSUPPORT@;
my $PROJROOT = "/proj";
......@@ -213,7 +214,7 @@ if (system("$GROUPDEL $unix_name")) {
}
}
if ($MAILMANSUPPORT) {
if ($MAILMANSUPPORT && !$ELABINELAB) {
# For perl
$EUID = $UID;
system("$DELMMLIST -a ${pid}-${gid}-users") == 0 or
......
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