diff options
| author | Miles Bader <miles@gnu.org> | 2002-04-24 00:08:34 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 2002-04-24 00:08:34 +0000 |
| commit | 7c1fc733989b4b707c7c84bb6d4645548f07ef59 (patch) | |
| tree | 239b13f9a1530492533fc7a7ba44cdfd1e57ff58 /lisp/menu-bar.el | |
| parent | e69738c93947721a737ab2540ed5e47c1242e0db (diff) | |
| download | emacs-7c1fc733989b4b707c7c84bb6d4645548f07ef59.tar.gz | |
(menu-bar-update-buffers-1): Make sure `uniquify-buffer-name-style' is bound.
Diffstat (limited to 'lisp/menu-bar.el')
| -rw-r--r-- | lisp/menu-bar.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index 959c68cc6ac..3618c8a5122 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -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) "*" "")) |