summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authortv <tv@shackspace.de>2015-01-07 05:52:25 +0100
committertv <tv@shackspace.de>2015-01-07 05:52:25 +0100
commitf64f203cd90137d4891c62c7817216e5f185f1fa (patch)
treed430ddfd33bfbc27d0ed9e35f5f5529b57775e53
parent054fdedefe623817668ee689e7eac9de3d74f540 (diff)
loadSubForest/TVMessage: unloadReadSubForests
-rw-r--r--TreeView.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/TreeView.hs b/TreeView.hs
index 218d167..92264e7 100644
--- a/TreeView.hs
+++ b/TreeView.hs
@@ -187,6 +187,7 @@ loadSubForest = \case
TVMessage m ->
Right
. unloadPartsWithFilename
+ . map unloadReadSubForests
. concatMap subForest
. fromMessageForest
. findFirsts messageMatch