Mercurial > emacs

changeset 34020:43839f6e2822

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(enriched-face-ans): Use face-attribute instead of face-foreground and face-background.
author Gerd Moellmann <gerd@gnu.org>
date Wed, 29 Nov 2000 19:22:18 +0000
parents 3d6f9638e8e5
children 213a832d6474
files lisp/enriched.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/enriched.el	Wed Nov 29 19:21:47 2000 +0000
+++ b/lisp/enriched.el	Wed Nov 29 19:22:18 2000 +0000
@@ -356,8 +356,8 @@
 	 (list (list "x-color" (substring (symbol-name face) 3))))
 	((string-match "^bg:" (symbol-name face))
 	 (list (list "x-bg-color" (substring (symbol-name face) 3))))
-	((let* ((fg (face-foreground face))
-		(bg (face-background face))
+	((let* ((fg (face-attribute face :foreground))
+		(bg (face-attribute face :background))
 		(props (face-font face t))
 		(ans (cdr (format-annotate-single-property-change
 			   'face nil props enriched-translations))))