Function: msb--add-to-menu

msb--add-to-menu is a byte-compiled function defined in msb.el.gz.

Signature

(msb--add-to-menu BUFFER FUNCTION-INFO MAX-BUFFER-NAME-LENGTH)

Documentation

Add BUFFER to the menu depicted by FUNCTION-INFO.

All side-effects. Adds an element of form (BUFFER-TITLE . BUFFER) to the buffer-list variable in FUNCTION-INFO.

Source Code

;; Defined in /usr/src/emacs/lisp/msb.el.gz
(defun msb--add-to-menu (buffer function-info max-buffer-name-length)
  "Add BUFFER to the menu depicted by FUNCTION-INFO.
All side-effects.  Adds an element of form (BUFFER-TITLE . BUFFER)
to the buffer-list variable in FUNCTION-INFO."
  (let ((list-symbol (aref function-info 0))) ;BUFFER-LIST-VARIABLE
    ;; Here comes the hairy side-effect!
    (push (cons (funcall (aref function-info 4) ;ITEM-HANDLER
			 buffer
			 max-buffer-name-length)
		buffer)
	  (symbol-value list-symbol))))