smeserver-manager/sme10/smeserver-manager-0.1.4-Sort-mail-anaysis-options-takeout-qmail-q-ones.patch

diff -urN smeserver-manager-0.1.4.old/root/usr/share/smanager/lib/SrvMngr/Controller/Qmailanalog.pm smeserver-manager-0.1.4/root/usr/share/smanager/lib/SrvMngr/Controller/Qmailanalog.pm
--- smeserver-manager-0.1.4.old/root/usr/share/smanager/lib/SrvMngr/Controller/Qmailanalog.pm   2024-02-27 09:49:36.692913457 +0000
+++ smeserver-manager-0.1.4/root/usr/share/smanager/lib/SrvMngr/Controller/Qmailanalog.pm       2024-02-27 10:22:59.476997780 +0000
@@ -129,20 +129,24 @@
 sub reportType_list {
 
     my $c = shift;
-    return [[ $c->l('qma_LIST_OUTGOING') => 'qmail-qread' ],
-           [ $c->l('qma_SUMMARIZE_QUEUE') => 'qmail-qstat' ],
-           [ $c->l('qma_SUCCESSFUL_DELIVERY_DELAY') => 'zddist' ],
-           [ $c->l('qma_REASONS_DEFERRAL') => 'zdeferrals' ],
-           [ $c->l('qma_REASONS_FAILURE') => 'zfailures' ],
-           [ $c->l('qma_BASIC_STATS') => 'zoverall' ],
-           [ $c->l('qma_RECIP_STATS') => 'zrecipients' ],
-           [ $c->l('qma_RECIP_HOSTS') => 'zrhosts' ],
-           [ $c->l('qma_RECIP_ORDERED') => 'zrxdelay' ],
-           [ $c->l('qma_SENDER_STATS') => 'zsenders' ],
-           [ $c->l('qma_SENDMAIL_STYLE') => 'zsendmail' ],
-           [ $c->l('qma_REASONS_SUCCESS') => 'zsuccesses' ],
-           [ $c->l('qma_SENDER_UIDS') => 'zsuids' ]]
+    
+    my @array = (
+#        [ $c->l('qma_LIST_OUTGOING') => 'qmail-qread' ],
+#        [ $c->l('qma_SUMMARIZE_QUEUE') => 'qmail-qstat' ],
+        [ $c->l('qma_SUCCESSFUL_DELIVERY_DELAY') => 'zddist' ],
+        [ $c->l('qma_REASONS_DEFERRAL') => 'zdeferrals' ],
+        [ $c->l('qma_REASONS_FAILURE') => 'zfailures' ],
+        [ $c->l('qma_BASIC_STATS') => 'zoverall' ],
+        [ $c->l('qma_RECIP_STATS') => 'zrecipients' ],
+        [ $c->l('qma_RECIP_HOSTS') => 'zrhosts' ],
+        [ $c->l('qma_RECIP_ORDERED') => 'zrxdelay' ],
+        [ $c->l('qma_SENDER_STATS') => 'zsenders' ],
+        [ $c->l('qma_SENDMAIL_STYLE') => 'zsendmail' ],
+        [ $c->l('qma_REASONS_SUCCESS') => 'zsuccesses' ],
+        [ $c->l('qma_SENDER_UIDS') => 'zsuids' ]
+    );
+    my @sorted_array = sort { $a->[0] cmp $b->[0] } @array;
+    return \@sorted_array;
 }
 
-
 1;
1	diff -urN smeserver-manager-0.1.4.old/root/usr/share/smanager/lib/SrvMngr/Controller/Qmailanalog.pm smeserver-manager-0.1.4/root/usr/share/smanager/lib/SrvMngr/Controller/Qmailanalog.pm
2	--- smeserver-manager-0.1.4.old/root/usr/share/smanager/lib/SrvMngr/Controller/Qmailanalog.pm 2024-02-27 09:49:36.692913457 +0000
3	+++ smeserver-manager-0.1.4/root/usr/share/smanager/lib/SrvMngr/Controller/Qmailanalog.pm 2024-02-27 10:22:59.476997780 +0000
4	@@ -129,20 +129,24 @@
5	sub reportType_list {
6
7	my $c = shift;
8	- return [[ $c->l('qma_LIST_OUTGOING') => 'qmail-qread' ],
9	- [ $c->l('qma_SUMMARIZE_QUEUE') => 'qmail-qstat' ],
10	- [ $c->l('qma_SUCCESSFUL_DELIVERY_DELAY') => 'zddist' ],
11	- [ $c->l('qma_REASONS_DEFERRAL') => 'zdeferrals' ],
12	- [ $c->l('qma_REASONS_FAILURE') => 'zfailures' ],
13	- [ $c->l('qma_BASIC_STATS') => 'zoverall' ],
14	- [ $c->l('qma_RECIP_STATS') => 'zrecipients' ],
15	- [ $c->l('qma_RECIP_HOSTS') => 'zrhosts' ],
16	- [ $c->l('qma_RECIP_ORDERED') => 'zrxdelay' ],
17	- [ $c->l('qma_SENDER_STATS') => 'zsenders' ],
18	- [ $c->l('qma_SENDMAIL_STYLE') => 'zsendmail' ],
19	- [ $c->l('qma_REASONS_SUCCESS') => 'zsuccesses' ],
20	- [ $c->l('qma_SENDER_UIDS') => 'zsuids' ]]
21	+
22	+ my @array = (
23	+# [ $c->l('qma_LIST_OUTGOING') => 'qmail-qread' ],
24	+# [ $c->l('qma_SUMMARIZE_QUEUE') => 'qmail-qstat' ],
25	+ [ $c->l('qma_SUCCESSFUL_DELIVERY_DELAY') => 'zddist' ],
26	+ [ $c->l('qma_REASONS_DEFERRAL') => 'zdeferrals' ],
27	+ [ $c->l('qma_REASONS_FAILURE') => 'zfailures' ],
28	+ [ $c->l('qma_BASIC_STATS') => 'zoverall' ],
29	+ [ $c->l('qma_RECIP_STATS') => 'zrecipients' ],
30	+ [ $c->l('qma_RECIP_HOSTS') => 'zrhosts' ],
31	+ [ $c->l('qma_RECIP_ORDERED') => 'zrxdelay' ],
32	+ [ $c->l('qma_SENDER_STATS') => 'zsenders' ],
33	+ [ $c->l('qma_SENDMAIL_STYLE') => 'zsendmail' ],
34	+ [ $c->l('qma_REASONS_SUCCESS') => 'zsuccesses' ],
35	+ [ $c->l('qma_SENDER_UIDS') => 'zsuids' ]
36	+ );
37	+ my @sorted_array = sort { $a->[0] cmp $b->[0] } @array;
38	+ return \@sorted_array;
39	}
40
41	-
42	1;