From: Eli Zaretskii <eliz@gnu.org>
Date: Sun, 24 Mar 2002 19:17:10 +0000 (+0000)
Subject: (facemenu-get-face): Remove unised variable `foreground'.
X-Git-Tag: ttn-vms-21-2-B4~15995
X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/c7bce5f21f8802b9c3be7691b6505162c230c232

(facemenu-get-face): Remove unised variable `foreground'.
---

diff --git a/lisp/facemenu.el b/lisp/facemenu.el
index ce1c859e05..e6b73b52d1 100644
--- a/lisp/facemenu.el
+++ b/lisp/facemenu.el
@@ -799,8 +799,7 @@ use the selected frame.  If t, then the global, non-frame faces are used."
 (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)
+  (let ((name (symbol-name symbol)))
     (cond ((facep symbol))
 	  (t (make-face symbol))))
   symbol)