summaryrefslogtreecommitdiffstats
path: root/src/Much
diff options
context:
space:
mode:
authortv <tv@krebsco.de>2026-04-01 17:19:25 +0200
committertv <tv@krebsco.de>2026-04-01 17:19:25 +0200
commit908fcce37e601b0c07f10a61439546bf0af57814 (patch)
tree2a19d5a48c1b3e6e17dba7cc8106e057433055fd /src/Much
parent36184551980eb59b67189c2a782c7f4461285d23 (diff)
notmuch show message body is a singleton list
https://github.com/notmuch/notmuch/blob/a691d54/notmuch-show.c#L692-L695
Diffstat (limited to 'src/Much')
-rw-r--r--src/Much/TreeView.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Much/TreeView.hs b/src/Much/TreeView.hs
index eb2263c..09eca5b 100644
--- a/src/Much/TreeView.hs
+++ b/src/Much/TreeView.hs
@@ -85,7 +85,8 @@ xconvHead m =
xconvBody :: Message -> Forest TreeView
-xconvBody m = map (xconvPart m) (messageBody m)
+xconvBody m =
+ [xconvPart m (messageBody m)]
xconvPart :: Message -> MessagePart -> Tree TreeView