Mercurial > emacs
changeset 4603:eb7d8f0543ab
(mouse-menu-bar-buffers): Use list-buffers-directory.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 13 Aug 1993 18:40:37 +0000 |
| parents | f4d3f4bce558 |
| children | 4eebfb2c36cd |
| files | lisp/menu-bar.el |
| diffstat | 1 files changed, 5 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/menu-bar.el Fri Aug 13 08:44:21 1993 +0000 +++ b/lisp/menu-bar.el Fri Aug 13 18:40:37 1993 +0000 @@ -208,7 +208,11 @@ (save-excursion (set-buffer elt) (if buffer-read-only "%" " ")) - (or (buffer-file-name elt) "")) + (or (buffer-file-name elt) + (save-excursion + (set-buffer elt) + list-buffers-directory) + "")) elt) head))) (and head (> (length (car (car head))) maxlen)