Commit ee1dbceb authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(menu-bar-update-buffers): Add optional parameter

FORCE.  If set, update the menu even if frame-or-buffer-changed-p
returns nil.
parent 0f6d89c4
......@@ -1024,10 +1024,10 @@ key (or menu-item)"))
(defvar menu-bar-buffers-menu-list-buffers-entry nil)
(defun menu-bar-update-buffers ()
(defun menu-bar-update-buffers (&optional force)
;; If user discards the Buffers item, play along.
(and (lookup-key (current-global-map) [menu-bar buffer])
(frame-or-buffer-changed-p)
(or force (frame-or-buffer-changed-p))
(let ((buffers (buffer-list))
(frames (frame-list))
(maxlen 0)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment