Mercurial > emacs

changeset 79648:f6d3ee769dcf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(list-colors-print): Use :background and :foreground instead of background-color and foreground-color.
author Richard M. Stallman <rms@gnu.org>
date Sat, 29 Dec 2007 19:01:40 +0000
parents f6c4e8c6c5f3
children 6805f3089622
files lisp/facemenu.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/facemenu.el	Sat Dec 29 12:41:44 2007 +0000
+++ b/lisp/facemenu.el	Sat Dec 29 19:01:40 2007 +0000
@@ -541,14 +541,14 @@
        (insert (car color))
        (indent-to 22))
      (point)
-     'face (cons 'background-color (car color)))
+     'face (list ':background (car color)))
     (put-text-property
      (prog1 (point)
        (insert " " (if (cdr color)
 		       (mapconcat 'identity (cdr color) ", ")
 		     (car color))))
      (point)
-     'face (cons 'foreground-color (car color)))
+     'face (list ':foreground (car color)))
     (indent-to (max (- (window-width) 8) 44))
     (insert (apply 'format "#%02x%02x%02x"
 		   (mapcar (lambda (c) (lsh c -8))