e-smith-base/sme10/e-smith-base-5.8.1-bz11766-group-modify-unix.patch

diff -Nur --no-dereference e-smith-base-5.8.1.old/root/etc/e-smith/events/actions/group-modify-unix e-smith-base-5.8.1/root/etc/e-smith/events/actions/group-modify-unix
--- e-smith-base-5.8.1.old/root/etc/e-smith/events/actions/group-modify-unix    2014-03-23 22:47:24.000000000 -0400
+++ e-smith-base-5.8.1/root/etc/e-smith/events/actions/group-modify-unix        2021-11-23 00:04:55.910000000 -0500
@@ -42,15 +42,15 @@
 my $event = shift || die "Event name arg missing\n";;
 my @groups;
 
-if ($event eq 'post-upgrade')
+if ( scalar @ARGV ) 
 {
-    @groups = $a->groups;
+    @groups = map { $a->get($_); } @ARGV;
 }
 else
 {
-    die "Group name arg missing\n" unless scalar @ARGV;
-    @groups = map { $a->get($_); } @ARGV;
+    @groups = $a->groups;
 }
+
 foreach my $group (@groups)
 {
     my $groupName = $group->key;
1	jpp	1.1	diff -Nur --no-dereference e-smith-base-5.8.1.old/root/etc/e-smith/events/actions/group-modify-unix e-smith-base-5.8.1/root/etc/e-smith/events/actions/group-modify-unix
2			--- e-smith-base-5.8.1.old/root/etc/e-smith/events/actions/group-modify-unix 2014-03-23 22:47:24.000000000 -0400
3			+++ e-smith-base-5.8.1/root/etc/e-smith/events/actions/group-modify-unix 2021-11-23 00:04:55.910000000 -0500
4			@@ -42,15 +42,15 @@
5			my $event = shift \|\| die "Event name arg missing\n";;
6			my @groups;
7
8			-if ($event eq 'post-upgrade')
9			+if ( scalar @ARGV )
10			{
11			- @groups = $a->groups;
12			+ @groups = map { $a->get($_); } @ARGV;
13			}
14			else
15			{
16			- die "Group name arg missing\n" unless scalar @ARGV;
17			- @groups = map { $a->get($_); } @ARGV;
18			+ @groups = $a->groups;
19			}
20			+
21			foreach my $group (@groups)
22			{
23			my $groupName = $group->key;