From dfab8e5e49d90c415f9585a02a2b0d6f72b4083a Mon Sep 17 00:00:00 2001 From: Austin Clements Date: Sat, 22 Mar 2014 11:51:05 +0000 Subject: 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. --- emacs/notmuch-tag.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'emacs/notmuch-tag.el') 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)) -- cgit v1.2.3