1 files changed, 1 insertions, 1 deletions
diff --git a/TreeView.hs b/TreeView.hs
index fad16fe..923212d 100644
--- a/TreeView.hs
+++ b/TreeView.hs
@@ -158,7 +158,7 @@ loadSubForest = \case
             . subForest
             . fromSearchResults s
             . either error id
-            <$> Notmuch.search s
+            <$> Notmuch.search [s]
 
     _ ->
         return $ Right []