diff options
Diffstat (limited to 'lisp/mouse.el')
-rw-r--r-- | lisp/mouse.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el index 943f53c781..9ea4d8bff1 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -1975,12 +1975,10 @@ and selects that window." (format "%%-%ds %%s%%s %%s" maxlen) (buffer-name elt) (if (buffer-modified-p elt) "*" " ") - (save-excursion - (set-buffer elt) + (with-current-buffer elt (if buffer-read-only "%" " ")) (or (buffer-file-name elt) - (save-excursion - (set-buffer elt) + (with-current-buffer elt (if list-buffers-directory (expand-file-name list-buffers-directory))) |