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"