It's especially unkind to leave interactive functions without
documentation.
(get-text-property (point) 'notmuch-search-thread-id))
(defun notmuch-search-show-thread ()
(get-text-property (point) 'notmuch-search-thread-id))
(defun notmuch-search-show-thread ()
+ "Display the currently selected thread."
(interactive)
(let ((thread-id (notmuch-search-find-thread-id)))
(if (> (length thread-id) 0)
(interactive)
(let ((thread-id (notmuch-search-find-thread-id)))
(if (> (length thread-id) 0)