(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)
(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))