emacs: send notmuch-query stderr to /dev/null

[notmuch] / emacs / notmuch-query.el

diff --git a/emacs/notmuch-query.el b/emacs/notmuch-query.el
index 0d6e7759a6b57593597dbcdb70afe5128ee1b3bf..921f62461760d51a3085cacfeda42f984e13dd48 100644 (file)
--- a/emacs/notmuch-query.el
+++ b/emacs/notmuch-query.el
@@ -35,7 +35,7 @@ is a possibly empty forest of replies.
         (json-false 'nil))
     (with-temp-buffer
       (progn
-       (apply 'call-process (append (list notmuch-command nil t nil) args))
+       (apply 'call-process (append (list notmuch-command nil (list t nil) nil) args))
        (goto-char (point-min))
        (json-read)))))
 
@@ -47,7 +47,7 @@ is a possibly empty forest of replies.
   (apply 'append
         (mapcar
           (lambda (tree)
-            (funcall mapper fn tree))
+            (funcall mapper function tree))
           seq)))
 
 (defun notmuch-query-map-threads (fn threads)