smeserver-domains/contribs10/smeserver-domains-1.4-bz10950-path.patch

diff -Nur --no-dereference smeserver-domains-1.4.old/root/etc/e-smith/web/functions/dungog-domains smeserver-domains-1.4/root/etc/e-smith/web/functions/dungog-domains
--- smeserver-domains-1.4.old/root/etc/e-smith/web/functions/dungog-domains     2016-04-28 07:31:09.000000000 -0400
+++ smeserver-domains-1.4/root/etc/e-smith/web/functions/dungog-domains 2021-05-31 14:52:57.410000000 -0400
@@ -38,7 +38,7 @@
     # external programs do not cause results to be tainted. See
     # "perlsec" manual page for details.
 
-    $ENV {'PATH'} = '';
+    $ENV {'PATH'} = '/usr/sbin:/usr/bin:/usr/local/bin';
     $ENV {'SHELL'} = '/bin/bash';
     delete $ENV {'ENV'};
 }
@@ -355,7 +355,7 @@
     {
         (my $u, my $d) = split (/@/, $_);
 
-        push (@vdemail2, $u)  if ($d eq $domain);
+        push (@vdemail2, $u)  if (defined $d and $d eq $domain);
     }
 
     #are there any ?
diff -Nur --no-dereference smeserver-domains-1.4.old/root/etc/e-smith/web/functions/userpanel-domains smeserver-domains-1.4/root/etc/e-smith/web/functions/userpanel-domains
--- smeserver-domains-1.4.old/root/etc/e-smith/web/functions/userpanel-domains  2016-04-28 07:31:09.000000000 -0400
+++ smeserver-domains-1.4/root/etc/e-smith/web/functions/userpanel-domains      2021-05-31 14:54:10.688000000 -0400
@@ -36,7 +36,7 @@
     # external programs do not cause results to be tainted. See
     # "perlsec" manual page for details.
 
-    $ENV {'PATH'} = '';
+    $ENV {'PATH'} = '/usr/sbin:/usr/bin:/usr/local/bin';
     $ENV {'SHELL'} = '/bin/bash';
     delete $ENV {'ENV'};
 }
@@ -227,7 +227,7 @@
     {
         (my $u, my $d) = split (/@/, $_);
 
-        push (@vdemail2, $u)  if ($d eq $domain);
+        push (@vdemail2, $u)  if (defined $d and $d eq $domain);
     }
 
     #are there any ?
1	diff -Nur --no-dereference smeserver-domains-1.4.old/root/etc/e-smith/web/functions/dungog-domains smeserver-domains-1.4/root/etc/e-smith/web/functions/dungog-domains
2	--- smeserver-domains-1.4.old/root/etc/e-smith/web/functions/dungog-domains 2016-04-28 07:31:09.000000000 -0400
3	+++ smeserver-domains-1.4/root/etc/e-smith/web/functions/dungog-domains 2021-05-31 14:52:57.410000000 -0400
4	@@ -38,7 +38,7 @@
5	# external programs do not cause results to be tainted. See
6	# "perlsec" manual page for details.
7
8	- $ENV {'PATH'} = '';
9	+ $ENV {'PATH'} = '/usr/sbin:/usr/bin:/usr/local/bin';
10	$ENV {'SHELL'} = '/bin/bash';
11	delete $ENV {'ENV'};
12	}
13	@@ -355,7 +355,7 @@
14	{
15	(my $u, my $d) = split (/@/, $_);
16
17	- push (@vdemail2, $u) if ($d eq $domain);
18	+ push (@vdemail2, $u) if (defined $d and $d eq $domain);
19	}
20
21	#are there any ?
22	diff -Nur --no-dereference smeserver-domains-1.4.old/root/etc/e-smith/web/functions/userpanel-domains smeserver-domains-1.4/root/etc/e-smith/web/functions/userpanel-domains
23	--- smeserver-domains-1.4.old/root/etc/e-smith/web/functions/userpanel-domains 2016-04-28 07:31:09.000000000 -0400
24	+++ smeserver-domains-1.4/root/etc/e-smith/web/functions/userpanel-domains 2021-05-31 14:54:10.688000000 -0400
25	@@ -36,7 +36,7 @@
26	# external programs do not cause results to be tainted. See
27	# "perlsec" manual page for details.
28
29	- $ENV {'PATH'} = '';
30	+ $ENV {'PATH'} = '/usr/sbin:/usr/bin:/usr/local/bin';
31	$ENV {'SHELL'} = '/bin/bash';
32	delete $ENV {'ENV'};
33	}
34	@@ -227,7 +227,7 @@
35	{
36	(my $u, my $d) = split (/@/, $_);
37
38	- push (@vdemail2, $u) if ($d eq $domain);
39	+ push (@vdemail2, $u) if (defined $d and $d eq $domain);
40	}
41
42	#are there any ?