Forward Firewall: BUGFIX-CustomGroup sort order

diff --git a/html/cgi-bin/fwhosts.cgi b/html/cgi-bin/fwhosts.cgi
index 97024353021fc253c9a8012ece4677c6f11eba61..02630526a712620778029ae2a0b3d7f8bcc27d12 100755 (executable)
--- a/html/cgi-bin/fwhosts.cgi
+++ b/html/cgi-bin/fwhosts.cgi
@@ -1442,7 +1442,7 @@ sub viewtablegrp
        { 
                print "<center><b>$Lang::tr{'fwhost empty'}</b>"; 
        }else{
-               foreach my $key (sort {$a <=> $b} keys %customgrp){
+               foreach my $key (sort { uc($customgrp{$a}[0]) cmp uc($customgrp{$b}[0]) } sort { uc($customgrp{$a}[2]) cmp uc($customgrp{$b}[2]) } keys %customgrp){
                        
                        $count++;
                        if ($helper ne $customgrp{$key}[0]){