Move menu-bar-select-buffer to msb.el

* lisp/menu-bar.el (menu-bar-select-buffer): Move from
here... (bug#15651).
* lisp/msb.el (menu-bar-select-buffer): ... to here (which is the
only usage in-tree in Emacs).
This commit is contained in:
Lars Ingebrigtsen 2021-05-30 07:49:17 +02:00
parent 9e705206ac
commit 253e52478c
2 changed files with 4 additions and 4 deletions

View file

@ -2240,10 +2240,6 @@ Buffers menu is regenerated."
(defvar-local list-buffers-directory nil
"String to display in buffer listings for buffers not visiting a file.")
(defun menu-bar-select-buffer ()
(interactive)
(switch-to-buffer last-command-event))
(defun menu-bar-select-frame (frame)
(make-frame-visible frame)
(raise-frame frame)

View file

@ -1052,6 +1052,10 @@ variable `msb-menu-cond'."
(msb--split-menus-2 list 0 nil)
list))
(defun menu-bar-select-buffer ()
(interactive)
(switch-to-buffer last-command-event))
(defun msb--make-keymap-menu (raw-menu)
(let ((end 'menu-bar-select-buffer)
(mcount 0))