comparison lisp/buff-menu.el @ 40489:86b32dd85d89

(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).
author Eli Zaretskii <eliz@gnu.org>
date Tue, 30 Oct 2001 10:41:57 +0000
parents aa310bebddef
children d2bfc00496d7
comparison
equal deleted inserted replaced
40488:554167b7ed9e 40489:86b32dd85d89
513 (when (and (boundp 'list-buffers-directory) 513 (when (and (boundp 'list-buffers-directory)
514 list-buffers-directory) 514 list-buffers-directory)
515 (setq this-buffer-directory list-buffers-directory)))) 515 (setq this-buffer-directory list-buffers-directory))))
516 (cond 516 (cond
517 ;; Don't mention internal buffers. 517 ;; Don't mention internal buffers.
518 ((string= (substring name 0 1) " ")) 518 ((and (string= (substring name 0 1) " ") (null file)))
519 ;; Maybe don't mention buffers without files. 519 ;; Maybe don't mention buffers without files.
520 ((and files-only (not file))) 520 ((and files-only (not file)))
521 ((string= name "*Buffer List*")) 521 ((string= name "*Buffer List*"))
522 ;; Otherwise output info. 522 ;; Otherwise output info.
523 (t 523 (t