Mercurial > hg > xemacs-beta

diff lisp/modes/enriched.el @ 207:e45d5e7c476e r20-4b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-4b2
author cvs
date Mon, 13 Aug 2007 10:03:52 +0200
parents 34a5b81f86ba
children 1f0dabaa0855
line wrap: on
line diff
--- a/lisp/modes/enriched.el	Mon Aug 13 10:02:48 2007 +0200
+++ b/lisp/modes/enriched.el	Mon Aug 13 10:03:52 2007 +0200
@@ -417,10 +417,10 @@
 	  (t
 	   (let* ((fg (and (not (eq (face-foreground face)
 				    (face-foreground 'default)))
-			   (color-instance-name (face-foreground face))))
+			   (color-name (face-foreground face))))
 		  (bg (and (not (eq (face-background face)
 				    (face-background 'default)))
-			   (color-instance-name (face-background face))))
+			   (color-name (face-background face))))
 		  (ans '()))
 	     (if fg (setq ans (cons (list "x-color" fg) ans)))
 	     (if bg (setq ans (cons (list "x-bg-color" bg) ans)))