Show custom field summary above results

This commit is contained in:
Eike Kettner
2020-12-16 21:34:53 +01:00
parent b66738b4c3
commit 8d7b3c7d74
4 changed files with 91 additions and 19 deletions

View File

@ -45,7 +45,7 @@ concat l0 l1 =
suff =
List.drop 1 l1.groups
in
ItemLightList (prev ++ [ ng ] ++ suff)
ItemLightList (prev ++ (ng :: suff))
else
ItemLightList (l0.groups ++ l1.groups)