[Emacs-diffs] Changes to emacs/lisp/facemenu.el,v [EMACS_22_BASE]

[Richard M. Stallman]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Branch:         EMACS_22_BASE
Changes by:     Richard M. Stallman <rms>       07/12/29 19:01:41

Index: facemenu.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/facemenu.el,v
retrieving revision 1.95.2.1
retrieving revision 1.95.2.2
diff -u -b -r1.95.2.1 -r1.95.2.2
--- facemenu.el 25 Jul 2007 04:47:25 -0000      1.95.2.1
+++ facemenu.el 29 Dec 2007 19:01:40 -0000      1.95.2.2
@@ -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))