Browse Source

Tiny fix

* lisp/org.el (org-get-tag-face): Tiny fix.
Nicolas Goaziou 9 years ago
parent
commit
b1d3a904f1
1 changed files with 1 additions and 1 deletions
  1. 1 1
      lisp/org.el

+ 1 - 1
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)