--- rpms/smeserver-ezmlm-web/contribs10/smeserver-ezmlm-web-1.1.3-bz11288-sme10.patch	2022/03/15 18:56:58	1.2
+++ rpms/smeserver-ezmlm-web/contribs10/smeserver-ezmlm-web-1.1.3-bz11288-sme10.patch	2022/03/19 05:07:17	1.3
@@ -23,3 +23,43 @@ diff -Nur --no-dereference smeserver-ezm
 +templates2events("/var/qmail/users/assign", $event);
 +safe_symlink("/var/qmail/bin/qmail-newu","root/etc/e-smith/events/$event/S55email-assign");
  
+diff -Nur --no-dereference smeserver-ezmlm-web-1.1.3.old/createlinks smeserver-ezmlm-web-1.1.3/createlinks
+--- smeserver-ezmlm-web-1.1.3.old/createlinks	2022-03-19 01:02:18.606000000 -0400
++++ smeserver-ezmlm-web-1.1.3/createlinks	2022-03-19 01:03:34.418000000 -0400
+@@ -45,7 +45,7 @@
+         mailinglist-update
+         mailinglist-assign
+         ));
+-my $event="smeserver-ezmlm-www-update";
++my $event="smeserver-ezmlm-web-update";
+ templates2events("/etc/ezmlm/ezmlmwebrc",$event);
+ templates2events("/home/e-smith/files/ezmlm/lists/webusers",$event);
+ templates2events("/etc/ezmlm/ezmlmwebrc", $event);
+diff -Nur --no-dereference smeserver-ezmlm-web-1.1.3.old/root/etc/e-smith/web/functions/mailinglists smeserver-ezmlm-web-1.1.3/root/etc/e-smith/web/functions/mailinglists
+--- smeserver-ezmlm-web-1.1.3.old/root/etc/e-smith/web/functions/mailinglists	2022-03-19 01:02:18.602000000 -0400
++++ smeserver-ezmlm-web-1.1.3/root/etc/e-smith/web/functions/mailinglists	2022-03-19 01:04:52.303000000 -0400
+@@ -280,7 +280,7 @@
+     foreach my $member ( split ( /,/, $members ) ) {
+         $members{$member} = 1;
+     }
+-    my @users = sort { $a->key() cmp $b->key() } $accounts->users();
++    my @users = sort { $a->key() cmp $b->key() } ( $accounts->users() , $accounts->get('admin') );
+ 
+ 
+     my $out = "<tr>\n        <td class=\"sme-noborders-label\">"
+@@ -474,6 +474,7 @@
+ 
+     my $listOwner = $q->param ('listOwner');
+     $listOwner = "admin" if ($listOwner eq "Administrator");
++    my @users = sort { $a->key() cmp $b->key() } ( $accounts->users() , $accounts->get('admin') );
+ 
+     #------------------------------------------------------------
+     # Looks good. Find out if this account has been taken
+@@ -498,6 +499,7 @@
+ 		  Domain => $listDomain,
+                   Description => $listDescription,
+ 	          Owner => $listOwner,
++                  webusers => $webusers,
+ 		} );
+ 
+     system ('/sbin/e-smith/signal-event', 'mailinglist-create', $listName) == 0