SubListe sortierung fix

This commit is contained in:
ragu 2022-09-28 13:28:45 +02:00
parent 72dcd2ec13
commit 5c98c8b8a5
10 changed files with 105 additions and 119 deletions

View file

@ -214,6 +214,7 @@ sub tpl(){
foreach my $id1 (sort {$node1->{$a}->{n_sort} <=> $node1->{$b}->{n_sort}} keys (%$node1)){
if($node1->{$id1}->{node_name} !~ /Firma|System/){
my $node2 = $db->collect_noderel($node1->{$id1}->{main_id},$lang,$users_dms->{u_id});
$topath = "/$viewsel[0]/$node->{$id}->{node_name}";
$mclass = "";
$mstyle = "";
if("$node1->{$id1}->{node_name}" eq "$viewsel[2]"){