diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-07-28 17:31:56 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-07-28 22:14:36 +0200 |
| commit | 0c5f436dc034b7f4d49f1c6b18009c42737a47ab (patch) | |
| tree | 636b579c7c50995ae80cf0a2465c6d431702289c /lisp/buff-menu.el | |
| parent | e700fff256fc6c59dc8ab0063b7626486f312e0f (diff) | |
| download | emacs-0c5f436dc034b7f4d49f1c6b18009c42737a47ab.tar.gz emacs-0c5f436dc034b7f4d49f1c6b18009c42737a47ab.tar.bz2 emacs-0c5f436dc034b7f4d49f1c6b18009c42737a47ab.zip | |
Abbreviate directory names the same way as file names in C-x C-b
* lisp/buff-menu.el (Buffer-menu--pretty-file-name): Abbreviate
directory file names, too (bug#23355).
Diffstat (limited to 'lisp/buff-menu.el')
| -rw-r--r-- | lisp/buff-menu.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el index 6406a59c6aa..3cea186e6e3 100644 --- a/lisp/buff-menu.el +++ b/lisp/buff-menu.el @@ -703,7 +703,8 @@ means list those buffers and no others." (defun Buffer-menu--pretty-file-name (file) (cond (file (abbreviate-file-name file)) - ((bound-and-true-p list-buffers-directory)) + ((bound-and-true-p list-buffers-directory) + (abbreviate-file-name list-buffers-directory)) (t ""))) ;;; buff-menu.el ends here |