diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/buff-menu.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c5d7760ff94..5e2814ca08c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +1999-11-12 Gerd Moellmann <gerd@gnu.org> + + * buff-menu.el (list-buffers-noselect): Use abbreviate-file-name + to display file names. + 1999-11-11 Gerd Moellmann <gerd@gnu.org> * mwheel.el: Fix copyright notice, don't require 'cl at run time. diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el index 8861ccf6d33..18b46dc8ece 100644 --- a/lisp/buff-menu.el +++ b/lisp/buff-menu.el @@ -566,7 +566,7 @@ The R column contains a % for buffers that are read-only." (indent-to 40 1) (or file (setq file this-buffer-directory)) (if file - (princ file)) + (princ (abbreviate-file-name file))) (princ "\n")))) (setq bl (cdr bl)))) (Buffer-menu-mode) |