diff options
| author |  Austin Clements <amdragon@MIT.EDU> | 2014-03-22 11:51:05 +0000 |
|---|---|---|
| committer |  David Bremner <david@tethera.net> | 2014-03-24 19:42:33 -0300 |
| commit | dfab8e5e49d90c415f9585a02a2b0d6f72b4083a (patch) | |
| tree | 0b60247f832e9fe4c4406162ba62fb2f2899429e /emacs/notmuch-tag.el | |
| parent | 87c2cd78fd8b3a83a6cfcc785df286ca458056dd (diff) | |
emacs: Combine notmuch-combine-face-text-property{, -string}
This combines our two face combining functions into one, easy to use
function with a much shorter name: `notmuch-apply-face'. This
function takes the full set of arguments that
`notmuch-combine-face-text-property' took, but takes them in a more
convenient order and provides smarter defaults that make the function
easy to use on both strings and buffers.
Diffstat (limited to 'emacs/notmuch-tag.el')
| -rw-r--r-- | emacs/notmuch-tag.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/emacs/notmuch-tag.el b/emacs/notmuch-tag.el index 908e7ade..41b16876 100644 --- a/emacs/notmuch-tag.el +++ b/emacs/notmuch-tag.el @@ -151,7 +151,7 @@ This can be used with `notmuch-tag-format-image-data'." (defun notmuch-tag-format-tags (tags &optional face) "Return a string representing formatted TAGS." (let ((face (or face 'notmuch-tag-face))) - (notmuch-combine-face-text-property-string + (notmuch-apply-face (mapconcat #'identity ;; nil indicated that the tag was deliberately hidden (delq nil (mapcar #'notmuch-tag-format-tag tags)) |