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

[Eli Zaretskii]

Index: emacs/lisp/facemenu.el
diff -c emacs/lisp/facemenu.el:1.60 emacs/lisp/facemenu.el:1.61
*** emacs/lisp/facemenu.el:1.60 Thu Mar 14 03:52:16 2002
--- emacs/lisp/facemenu.el      Sun Mar 24 14:17:10 2002
***************
*** 799,806 ****
  (defun facemenu-get-face (symbol)
    "Make sure FACE exists.
  If not, create it and add it to the appropriate menu.  Return the SYMBOL."
!   (let ((name (symbol-name symbol))
!       foreground)
      (cond ((facep symbol))
          (t (make-face symbol))))
    symbol)
--- 799,805 ----
  (defun facemenu-get-face (symbol)
    "Make sure FACE exists.
  If not, create it and add it to the appropriate menu.  Return the SYMBOL."
!   (let ((name (symbol-name symbol)))
      (cond ((facep symbol))
          (t (make-face symbol))))
    symbol)