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	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;