diff options
| author | tv <tv@krebsco.de> | 2026-04-02 01:18:39 +0200 |
|---|---|---|
| committer | tv <tv@krebsco.de> | 2026-04-02 01:18:39 +0200 |
| commit | b1b504279eb3de707dc8ec2358d3ecb550c69dee (patch) | |
| tree | 2fcfa68fda40654960b7883d7ffe9e5b74eac3da /src/Much | |
| parent | 908fcce37e601b0c07f10a61439546bf0af57814 (diff) | |
fromMessageTree use fromMessageForest
Diffstat (limited to 'src/Much')
| -rw-r--r-- | src/Much/TreeView.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Much/TreeView.hs b/src/Much/TreeView.hs index 09eca5b..2b3c8f2 100644 --- a/src/Much/TreeView.hs +++ b/src/Much/TreeView.hs @@ -72,7 +72,7 @@ fromMessageForest = map fromMessageTree fromMessageTree :: Tree Message -> Tree TreeView fromMessageTree (Node m ms) = Node (TVMessage m) - (xconvHead m <> xconvBody m <> map fromMessageTree ms) + (xconvHead m <> xconvBody m <> fromMessageForest ms) xconvHead :: Message -> Forest TreeView |