Function: msb--make-keymap-menu

msb--make-keymap-menu is a byte-compiled function defined in msb.el.gz.

Signature

(msb--make-keymap-menu RAW-MENU)

Source Code

;; Defined in /usr/src/emacs/lisp/msb.el.gz
(defun msb--make-keymap-menu (raw-menu)
  (let ((mcount 0))
    (mapcar
     (lambda (sub-menu)
       (cond
	((eq 'separator sub-menu)
	 (list 'separator "--"))
	(t
	 (let ((buffers (mapcar (lambda (item)
				  (cons (buffer-name (cdr item))
					(cons (car item) 'msb--select-buffer)))
				(cdr sub-menu))))
           (nconc (list (incf mcount) (car sub-menu)
			'keymap (car sub-menu))
		  (msb--split-menus buffers))))))
     raw-menu)))