summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authortv <tv@shackspace.de>2014-12-29 02:13:42 +0100
committertv <tv@shackspace.de>2014-12-29 02:13:42 +0100
commit618c6b5e2237e4c1e537e83a7f9d9672fca1f217 (patch)
treec80e25626f5790170de33402c7eb2134b8da811a
parent96871af9eeac125562926ed373067530d303949f (diff)
Revert "add empty line between mail header and body"
This reverts commit 471e376a3d4a0257a2f27fa067fcb4f707cc7e6d.
-rw-r--r--TreeView.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/TreeView.hs b/TreeView.hs
index d1b0c95..4edf9b3 100644
--- a/TreeView.hs
+++ b/TreeView.hs
@@ -111,7 +111,7 @@ xconvPartContent
:: Message -> MessagePart -> MessageContent -> Forest TreeView
xconvPartContent m p = \case
ContentText t ->
- map (xconvLine m p) (zip [0..] ("" : T.lines t))
+ map (xconvLine m p) $ zip [0..] (T.lines t)
ContentMultipart parts ->
map (xconvPart2 m) parts
-- [Node (TVMessageLine m p 0 "ContentMultipart") []]