From b1d3a904f11cc32db61d0ae7323f009b31064bed Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Thu, 6 Aug 2015 15:41:16 +0200 Subject: [PATCH] Tiny fix * lisp/org.el (org-get-tag-face): Tiny fix. --- lisp/org.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/org.el b/lisp/org.el index 32d7b6a43..bd3937f00 100755 --- a/lisp/org.el +++ b/lisp/org.el @@ -6530,7 +6530,7 @@ PRIORITY is a character." If TAG is a number, get the corresponding match group." (let ((tag (if (wholenump tag) (match-string tag) tag))) (or (org-face-from-face-or-color - 'tag 'org-tag (cdr (assoc kwd org-tag-faces))) + 'tag 'org-tag (cdr (assoc tag org-tag-faces))) 'org-tag))) (defun org-font-lock-add-priority-faces (limit)