From b57090fedb703081216f68050930233eba9ee98f Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Sun, 24 Oct 2021 23:56:22 -0400 Subject: piem-lei-known-mid-p: Use with-output-to-string piem-lei-known-mid-p does essentially the same thing as piem-notmuch-known-mid-p, so collect output in a consistent way. Message-Id: <20211025035630.297598-3-kyle@kyleam.com> --- piem-lei.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/piem-lei.el b/piem-lei.el index 611b324..6fb659c 100644 --- a/piem-lei.el +++ b/piem-lei.el @@ -579,10 +579,10 @@ Return a list with a `piem-lei-msg' object for each root." "Return non-nil if MID is known to lei. The message ID should not include have surrounding brackets." (not (string-empty-p - (with-temp-buffer - (call-process "lei" nil '(t nil) nil - "q" "--format=ldjson" (concat "mid:" mid)) - (buffer-string))))) + (with-output-to-string + (call-process "lei" + nil (list standard-output nil) nil + "q" "--format=ldjson" (concat "mid:" mid)))))) (defun piem-lei-mid-to-thread (mid) "Return a function that inserts an mbox for MID's thread." -- cgit v1.2.3