Mercurial > emacs
comparison lisp/buff-menu.el @ 26418:e3f8778af2f7
(list-buffers-noselect): Use abbreviate-file-name
to display file names.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Fri, 12 Nov 1999 12:41:46 +0000 |
parents | e8ec0085ff7b |
children | 44991e974f6d |
comparison
equal
deleted
inserted
replaced
26417:5678b244c3ac | 26418:e3f8778af2f7 |
---|---|
564 (indent-to 27 1) | 564 (indent-to 27 1) |
565 (princ mode)) | 565 (princ mode)) |
566 (indent-to 40 1) | 566 (indent-to 40 1) |
567 (or file (setq file this-buffer-directory)) | 567 (or file (setq file this-buffer-directory)) |
568 (if file | 568 (if file |
569 (princ file)) | 569 (princ (abbreviate-file-name file))) |
570 (princ "\n")))) | 570 (princ "\n")))) |
571 (setq bl (cdr bl)))) | 571 (setq bl (cdr bl)))) |
572 (Buffer-menu-mode) | 572 (Buffer-menu-mode) |
573 ;; DESIRED-POINT doesn't have to be set; it is not when the | 573 ;; DESIRED-POINT doesn't have to be set; it is not when the |
574 ;; current buffer is not displayed for some reason. | 574 ;; current buffer is not displayed for some reason. |