diff options
Diffstat (limited to 'src/Much/TreeView.hs')
| -rw-r--r-- | src/Much/TreeView.hs | 3 |
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 |