* lisp/org.el (org-get-tag-face): Tiny fix.
This commit is contained in:
Nicolas Goaziou 2015-08-06 15:41:16 +02:00
parent 3a632fa201
commit b1d3a904f1
1 changed files with 1 additions and 1 deletions

View File

@ -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)