(menu-bar-update-buffers-1): Make sure `uniquify-buffer-name-style' is bound.
This commit is contained in:
parent
e69738c939
commit
7c1fc73398
2 changed files with 7 additions and 1 deletions
|
@ -1,3 +1,8 @@
|
|||
2002-04-24 Miles Bader <miles@gnu.org>
|
||||
|
||||
* menu-bar.el (menu-bar-update-buffers-1): Make sure
|
||||
`uniquify-buffer-name-style' is bound.
|
||||
|
||||
2002-04-23 Colin Walters <walters@verbum.org>
|
||||
|
||||
* replace.el (toplevel): Require `cl' while compiling.
|
||||
|
|
|
@ -1267,7 +1267,8 @@ key (or menu-item)"))
|
|||
;; (format "%%%ds %%s%%s %%s" menu-bar-update-buffers-maxbuf)
|
||||
(let* ((buf (car elt))
|
||||
(file
|
||||
(and (null uniquify-buffer-name-style)
|
||||
(and (or (not (boundp 'uniquify-buffer-name-style))
|
||||
(null uniquify-buffer-name-style))
|
||||
(or (buffer-file-name buf)
|
||||
(buffer-local-value 'list-buffers-directory buf))))
|
||||
(mod (if (buffer-modified-p buf) "*" ""))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue