aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--contrib/notmuch-pick/notmuch-pick.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/contrib/notmuch-pick/notmuch-pick.el b/contrib/notmuch-pick/notmuch-pick.el
index be6a91a7..db2a7cb9 100644
--- a/contrib/notmuch-pick/notmuch-pick.el
+++ b/contrib/notmuch-pick/notmuch-pick.el
@@ -241,7 +241,10 @@ Some useful entries are:
(defun notmuch-pick-get-message-id ()
"Return the message id of the current message."
- (concat "id:\"" (notmuch-pick-get-prop :id) "\""))
+ (let ((id (notmuch-pick-get-prop :id)))
+ (if id
+ (notmuch-id-to-query id)
+ nil)))
(defun notmuch-pick-get-match ()
"Return whether the current message is a match."