From ae8301597037c176108f5eb40d783593de427870 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Tue, 30 Oct 2001 10:44:17 +0000 Subject: (list-buffers-noselect): If the buffer's name starts with a blank, but it visits a file, do show it (for files whose names start with a blank). --- lisp/ChangeLog | 6 ++++++ lisp/buff-menu.el | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) (limited to 'lisp') diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 17a24e2fa1b..2f6167feee5 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2001-10-30 Eli Zaretskii + + * buff-menu.el (list-buffers-noselect): If the buffer's name + starts with a blank, but it visits a file, do show it (for files + whose names start with a blank). + 2001-10-30 Stefan Monnier * textmodes/fill.el (sentence-end-double-space) diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el index bc995f0303f..a5c43d1c60f 100644 --- a/lisp/buff-menu.el +++ b/lisp/buff-menu.el @@ -515,7 +515,7 @@ The R column contains a % for buffers that are read-only." (setq this-buffer-directory list-buffers-directory)))) (cond ;; Don't mention internal buffers. - ((string= (substring name 0 1) " ")) + ((and (string= (substring name 0 1) " ") (null file))) ;; Maybe don't mention buffers without files. ((and files-only (not file))) ((string= name "*Buffer List*")) -- cgit v1.2.1