changeset 44797:71fd2ea78dcb

(menu-bar-update-buffers-1): Make sure `uniquify-buffer-name-style' is bound.
author Miles Bader <miles@gnu.org>
date Wed, 24 Apr 2002 00:07:40 +0000
parents b9d6590397ef
children defb41d94250
files lisp/menu-bar.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/menu-bar.el	Tue Apr 23 20:36:01 2002 +0000
+++ b/lisp/menu-bar.el	Wed Apr 24 00:07:40 2002 +0000
@@ -1267,7 +1267,8 @@
   ;; (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) "*" ""))