emacs: tree: bare-id in tree

Previously notmuch-tree-get-message-id always returned the id
including the prefix "id:". Modify the function to take an optional
`bare' argument saying to return the raw string.

This will be useful later and brings the function in line with
notmuch-show-get-message-id.
This commit is contained in:
Mark Walters 2013-12-19 19:16:51 +00:00 committed by David Bremner
parent 191f41cfec
commit e36284d72d

View file

@ -319,11 +319,13 @@ correct message properties."
"Return the tags of the current message."
(notmuch-tree-get-prop :tags))
(defun notmuch-tree-get-message-id ()
(defun notmuch-tree-get-message-id (&optional bare)
"Return the message id of the current message."
(let ((id (notmuch-tree-get-prop :id)))
(if id
(notmuch-id-to-query id)
(if bare
id
(notmuch-id-to-query id))
nil)))
(defun notmuch-tree-get-match ()