Mercurial > emacs

changeset 28110:7f4fe6e367dc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(enriched-decode-foreground): Use display-color-p. (enriched-decode-background): Likewise.
author Dave Love <fx@gnu.org>
date Sun, 12 Mar 2000 15:25:35 +0000
parents 2f4ab9eb303c
children 90875cd704b5
files lisp/enriched.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/enriched.el	Sun Mar 12 15:22:51 2000 +0000
+++ b/lisp/enriched.el	Sun Mar 12 15:25:35 2000 +0000
@@ -443,7 +443,7 @@
     (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 @@
     (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)))