aboutsummaryrefslogtreecommitdiff
path: root/emacs/notmuch-draft.el
diff options
context:
space:
mode:
authorDavid Bremner <david@tethera.net>2021-08-29 12:23:29 -0700
committerDavid Bremner <david@tethera.net>2021-09-11 10:16:47 -0300
commita890241138ea468f8a275941b02da39b4e894c1e (patch)
tree8f26ee426bf692f34f2fe49377a0038e3c37af56 /emacs/notmuch-draft.el
parent06477bce03d09353e92cea7a59134b5ac3facae3 (diff)
emacs: wrap process-lines
Initially just set the working directory, to avoid (the implicit) call-process crashing when the default-directory points to a non-existent location. Use of a macro here is over-engineering for this change, but the same change needs to be applied to several other process creation primitives.
Diffstat (limited to 'emacs/notmuch-draft.el')
-rw-r--r--emacs/notmuch-draft.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/emacs/notmuch-draft.el b/emacs/notmuch-draft.el
index aeb6c588..0b1ba43f 100644
--- a/emacs/notmuch-draft.el
+++ b/emacs/notmuch-draft.el
@@ -239,7 +239,7 @@ applied to newly inserted messages)."
(defun notmuch-draft-resume (id)
"Resume editing of message with id ID."
;; Used by command `notmuch-show-resume-message'.
- (let* ((tags (process-lines notmuch-command "search" "--output=tags"
+ (let* ((tags (notmuch--process-lines notmuch-command "search" "--output=tags"
"--exclude=false" id))
(draft (equal tags (notmuch-update-tags tags notmuch-draft-tags))))
(when (or draft