Commit 2f3f040a authored by Dave Love's avatar Dave Love
Browse files

(enriched-decode-foreground, enriched-decode-background): Don't use

internal-find-face.
parent 7a5348db
......@@ -442,7 +442,7 @@ Return value is \(begin end name positive-p), or nil if none was found."
(let ((face (intern (concat "fg:" color))))
(cond ((null color)
(message "Warning: no color specified for <x-color>"))
((internal-find-face face))
((facep face))
((and (display-color-p) (facemenu-get-face face)))
((make-face face)
(message "Warning: color `%s' can't be displayed" color)))
......@@ -452,7 +452,7 @@ Return value is \(begin end name positive-p), or nil if none was found."
(let ((face (intern (concat "bg:" color))))
(cond ((null color)
(message "Warning: no color specified for <x-bg-color>"))
((internal-find-face face))
((facep face))
((and (display-color-p) (facemenu-get-face face)))
((make-face face)
(message "Warning: color `%s' can't be displayed" color)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment