From: Alp Aker <aker@pitt.edu>
Date: Sat, 28 May 2011 20:08:05 +0000 (-0400)
Subject: Additional minor fix to (Bug#8539).
X-Git-Tag: emacs-pretest-24.0.90~104^2~618^2~113
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4ac619f07bc6d7560a04f5aa505c6ef084975d93;p=emacs.git

Additional minor fix to (Bug#8539).

* lisp/buff-menu.el (Buffer-menu-buffer+size): Use Buffer-menu-buffer-column.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9da3ecdd777..507a7bdf0ac 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -9,8 +9,9 @@
 
 2011-05-28  Alp Aker  <aker@pitt.edu>  (tiny change)
 
-	* buff-menu.el (Buffer-menu-revert-function, Buffer-menu-sort):
-	Use Buffer-menu-buffer-column (Bug#8539).
+	* buff-menu.el (Buffer-menu-revert-function, Buffer-menu-sort)
+	(Buffer-menu-buffer+size): Use Buffer-menu-buffer-column
+	(Bug#8539).
 
 2011-05-28  Chong Yidong  <cyd@stupidchicken.com>
 
diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el
index 6da9d908305..95f309e33b9 100644
--- a/lisp/buff-menu.el
+++ b/lisp/buff-menu.el
@@ -688,7 +688,9 @@ For more information, see the function `buffer-menu'."
     (concat name
 	    (propertize (make-string (- name+space-width (string-width name))
 				     ?\s)
-			'display `(space :align-to ,(+ 4 name+space-width)))
+			'display `(space :align-to
+					 ,(+ Buffer-menu-buffer-column
+					     name+space-width)))
 	    size)))
 
 (defun Buffer-menu-sort (column)