From: Miles Bader <miles@gnu.org>
Date: Tue, 14 Jun 2005 22:49:09 +0000 (+0000)
Subject: Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-408
X-Git-Tag: emacs-pretest-22.0.90~8931
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b6116bd2567b686d591306f5b31e3c8e35952f75;p=emacs.git

Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-408

Remove "-face" suffix from Buffer-menu-buffer face

2005-06-14  Miles Bader  <miles@gnu.org>

   * lisp/buff-menu.el (Buffer-menu-buffer): Remove "-face" suffix from
   face name.
   (Buffer-menu-buffer-face): New backward-compatibility alias for
   renamed face.
   (list-buffers-noselect): Use renamed Buffer-menu-buffer face.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f1cb38a45e1..0a491e0d93e 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2005-06-14  Miles Bader  <miles@gnu.org>
+
+	* buff-menu.el (Buffer-menu-buffer): Remove "-face" suffix from
+	face name.
+	(Buffer-menu-buffer-face): New backward-compatibility alias for
+	renamed face.
+	(list-buffers-noselect): Use renamed Buffer-menu-buffer face.
+
 2005-06-15  Daniel Pfeiffer  <occitan@esperanto.org>
 
 	* progmodes/make-mode.el (makefile-space, makefile-makepp-perl):
diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el
index 7e9115a79dc..79247ad30df 100644
--- a/lisp/buff-menu.el
+++ b/lisp/buff-menu.el
@@ -74,11 +74,13 @@
   :type 'boolean
   :group 'Buffer-menu)
 
-(defface Buffer-menu-buffer-face
+(defface Buffer-menu-buffer
   '((t (:weight bold)))
   "Face used to highlight buffer name."
   :group 'Buffer-menu
   :group 'font-lock-highlighting-faces)
+;; backward-compatibility alias
+(put 'Buffer-menu-buffer-face 'face-alias 'Buffer-menu-buffer)
 
 (defcustom Buffer-menu-buffer+size-width 26
   "*How wide to jointly make the buffer name and size columns."
@@ -773,7 +775,7 @@ For more information, see the function `buffer-menu'."
 					 (int-to-string (nth 3 buffer))
 					 `(buffer-name ,(nth 2 buffer)
 					   buffer ,(car buffer)
-					   font-lock-face Buffer-menu-buffer-face
+					   font-lock-face Buffer-menu-buffer
 					   mouse-face highlight
 					   help-echo "mouse-2: select this buffer"))
 		"  "