# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1017953215 0
# Node ID 4c958bb71cb6f394ea7275cf215c57a3610298ea
# Parent  0abb3076538648c58907ace53b8703b04881eb7a
(enriched-decode-foreground)
(enriched-decode-background): Don't call facemenu-get-face.

diff -r 0abb30765386 -r 4c958bb71cb6 lisp/enriched.el
--- a/lisp/enriched.el	Thu Apr 04 20:42:56 2002 +0000
+++ b/lisp/enriched.el	Thu Apr 04 20:46:55 2002 +0000
@@ -432,7 +432,7 @@
       (delete-char 1)))
 
 (defun enriched-decode-foreground (from to &optional color)
-  (if (and color (display-color-p) (facemenu-get-face face))
+  (if (and color (display-color-p))
       (list from to 'face (cons ':foreground color))
     (if (null color)
 	(message "Warning: no color specified for <x-color>")
@@ -440,7 +440,7 @@
     nil))
 
 (defun enriched-decode-background (from to &optional color)
-  (if (and color (display-color-p) (facemenu-get-face face))
+  (if (and color (display-color-p))
       (list from to 'face (cons ':background color))
     (if (null color)
 	(message "Warning: no color specified for <x-bg-color>")