From: Tino Calancha <tino.calancha@gmail.com>
Date: Thu, 8 Dec 2016 04:46:25 +0000 (+0900)
Subject: Fix Bug#24962
X-Git-Tag: emacs-26.0.90~1154
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=af96803459cb777fa4528e02bd0f60c1d502638f;p=emacs.git

Fix Bug#24962

* lisp/buff-menu.el (list-buffers--refresh):
List buffers with name starting with " " if they visit a file.
* test/lisp/buff-menu-tests.el (buff-menu-24962):
Update test result as pass.
---

diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el
index e2aa2da0388..dcf5b0f3888 100644
--- a/lisp/buff-menu.el
+++ b/lisp/buff-menu.el
@@ -671,7 +671,8 @@ means list those buffers and no others."
 	       (file buffer-file-name))
 	  (when (and (buffer-live-p buffer)
 		     (or buffer-list
-			 (and (not (string= (substring name 0 1) " "))
+			 (and (or (not (string= (substring name 0 1) " "))
+                                  file)
 			      (not (eq buffer buffer-menu-buffer))
 			      (or file show-non-file))))
 	    (push (list buffer
diff --git a/test/lisp/buff-menu-tests.el b/test/lisp/buff-menu-tests.el
index c55dc8128bc..133a4f67a9c 100644
--- a/test/lisp/buff-menu-tests.el
+++ b/test/lisp/buff-menu-tests.el
@@ -27,7 +27,6 @@
 
 (ert-deftest buff-menu-24962 ()
   "Test for http://debbugs.gnu.org/24962 ."
-  :expected-result :failed
   (let ((file (expand-file-name "foo" temporary-file-directory))
         buf)
     (unwind-protect