Function: org-get-todo-face
org-get-todo-face is a byte-compiled function defined in org.el.gz.
Signature
(org-get-todo-face KWD)
Documentation
Get the right face for a TODO keyword KWD.
If KWD is a number, get the corresponding match group.
Source Code
;; Defined in /usr/src/emacs/lisp/org/org.el.gz
(defun org-get-todo-face (kwd)
"Get the right face for a TODO keyword KWD.
If KWD is a number, get the corresponding match group."
(when (numberp kwd) (setq kwd (match-string kwd)))
(or (org-face-from-face-or-color
'todo 'org-todo (cdr (assoc kwd org-todo-keyword-faces)))
(and (member kwd org-done-keywords) 'org-done)
'org-todo))