From 11a220a3c1b4c78d6fa994766a5e192d5619751e Mon Sep 17 00:00:00 2001 From: Jani Nikula Date: Fri, 7 Dec 2012 00:48:05 +0200 Subject: [PATCH] emacs: add support for stashing the thread id in show view Add a prefix argument to notmuch-show-stash-message-id to stash thread id instead of message id. --- emacs/notmuch-show.el | 14 ++++++++++---- 1 file changed, 10 insertions(+), 4 deletions(-) diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el index 20f89970..7d9f8a90 100644 --- a/emacs/notmuch-show.el +++ b/emacs/notmuch-show.el @@ -1905,10 +1905,16 @@ thread from search." (interactive) (notmuch-common-do-stash (notmuch-show-get-from))) -(defun notmuch-show-stash-message-id () - "Copy id: query matching the current message to kill-ring." - (interactive) - (notmuch-common-do-stash (notmuch-show-get-message-id))) +(defun notmuch-show-stash-message-id (&optional stash-thread-id) + "Copy id: query matching the current message to kill-ring. + +If invoked with a prefix argument (or STASH-THREAD-ID is +non-nil), copy thread: query matching the current thread to +kill-ring." + (interactive "P") + (if stash-thread-id + (notmuch-common-do-stash notmuch-show-thread-id) + (notmuch-common-do-stash (notmuch-show-get-message-id)))) (defun notmuch-show-stash-message-id-stripped () "Copy message ID of current message (sans `id:' prefix) to kill-ring." -- 2.43.0