1 |
slords |
1.1 |
diff -up e-smith-base-5.2.0/root/etc/e-smith/events/actions/group-modify-unix.ibay_groups e-smith-base-5.2.0/root/etc/e-smith/events/actions/group-modify-unix |
2 |
|
|
--- e-smith-base-5.2.0/root/etc/e-smith/events/actions/group-modify-unix.ibay_groups 2005-11-20 21:28:05.000000000 -0700 |
3 |
|
|
+++ e-smith-base-5.2.0/root/etc/e-smith/events/actions/group-modify-unix 2010-09-27 14:29:25.000000000 -0600 |
4 |
|
|
@@ -71,6 +71,9 @@ foreach my $group (@groups) |
5 |
|
|
my @oldMembers = split (/\s+/, $members); |
6 |
|
|
my @newMembers = split (/,/, $properties {'Members'}); |
7 |
|
|
|
8 |
|
|
+ # Add in ibay group membership |
9 |
|
|
+ push @newMembers, (map { $_->key } $a->get_all_by_prop(Group => $groupName)); |
10 |
|
|
+ |
11 |
|
|
# "admin" and "www" are implicit members of all groups |
12 |
|
|
push @newMembers, qw(www admin); |
13 |
|
|
|