mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 17:24:23 +00:00
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:
parent
9e705206ac
commit
253e52478c
2 changed files with 4 additions and 4 deletions
|
|
@ -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)
|
||||
|
|
|
|||
|
|
@ -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))
|
||||
|
|
|
|||
Loading…
Reference in a new issue