(menu-bar-update-buffers-1): Make sure `uniquify-buffer-name-style' is bound.

This commit is contained in:
Miles Bader 2002-04-24 00:08:34 +00:00
parent e69738c939
commit 7c1fc73398
2 changed files with 7 additions and 1 deletions

View file

@ -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.

View file

@ -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) "*" ""))