Mercurial > emacs
changeset 97396:d122b5da1bae
(ibuffer-buffer-file-name): Return nil rather than empty string when
no filename.
(define-ibuffer-column filename): Accomodate that change.
author | John Paul Wallington <jpw@pobox.com> |
---|---|
date | Sun, 10 Aug 2008 03:42:43 +0000 |
parents | 7be71f2c868b |
children | 4c5ef9f11950 |
files | lisp/ibuffer.el |
diffstat | 1 files changed, 2 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ibuffer.el Sun Aug 10 01:51:23 2008 +0000 +++ b/lisp/ibuffer.el Sun Aug 10 03:42:43 2008 +0000 @@ -1245,8 +1245,7 @@ dired-directory (car dired-directory))) (bound-and-true-p list-buffers-directory)))) - (and dirname (expand-file-name dirname))) - "")) + (and dirname (expand-file-name dirname))))) (define-ibuffer-op ibuffer-do-save () "Save marked buffers as with `save-buffer'." @@ -1768,7 +1767,7 @@ (t (format "%d files" total)))))) (let ((directory-abbrev-alist ibuffer-directory-abbrev-alist)) (abbreviate-file-name - (ibuffer-buffer-file-name)))) + (or (ibuffer-buffer-file-name) "")))) (define-ibuffer-column filename-and-process (:name "Filename/Process"