(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)))))
(apply 'append
(mapcar
(lambda (tree)
- (funcall mapper fn tree))
+ (funcall mapper function tree))
seq)))
(defun notmuch-query-map-threads (fn threads)