(enriched-decode-foreground): Use display-color-p.

(enriched-decode-background): Likewise.
This commit is contained in:
Dave Love 2000-03-12 15:25:35 +00:00
parent e1cff36058
commit 04c26901e2

View file

@ -443,7 +443,7 @@ Return value is \(begin end name positive-p), or nil if none was found."
(cond ((null color)
(message "Warning: no color specified for <x-color>"))
((internal-find-face face))
((and window-system (facemenu-get-face face)))
((and (display-color-p) (facemenu-get-face face)))
((make-face face)
(message "Warning: color `%s' can't be displayed" color)))
(list from to 'face face)))
@ -453,7 +453,7 @@ Return value is \(begin end name positive-p), or nil if none was found."
(cond ((null color)
(message "Warning: no color specified for <x-bg-color>"))
((internal-find-face face))
((and window-system (facemenu-get-face face)))
((and (display-color-p) (facemenu-get-face face)))
((make-face face)
(message "Warning: color `%s' can't be displayed" color)))
(list from to 'face face)))