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