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.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'emacs/notmuch.el') diff --git a/emacs/notmuch.el b/emacs/notmuch.el index 65baa0cb..9e39a76b 100644 --- a/emacs/notmuch.el +++ b/emacs/notmuch.el @@ -649,7 +649,7 @@ foreground and blue background." (let ((tag (car elem)) (attributes (cdr elem))) (when (member tag line-tag-list) - (notmuch-combine-face-text-property start end attributes)))) + (notmuch-apply-face nil attributes nil start end)))) ;; Reverse the list so earlier entries take precedence (reverse notmuch-search-line-faces))) -- cgit v1.2.3