From 5f78ec96b34fe96b933d079776a24f2b23e767a3 Mon Sep 17 00:00:00 2001
From: tv <tv@krebsco.de>
Date: Sun, 30 Apr 2017 15:24:03 +0200
Subject: Notmuch.search: support passing additional args

---
 TreeView.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'TreeView.hs')

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 []
-- 
cgit v1.2.3