Function: Custom-mode-menu

Custom-mode-menu is an interactive and byte-compiled function defined in cus-edit.el.gz.

Signature

(Custom-mode-menu ARG1)

Documentation

Menu used in customization buffers.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/cus-edit.el.gz
;;; Toolbar and menubar support

(easy-menu-define
  Custom-mode-menu (list custom-mode-map custom-field-keymap)
  "Menu used in customization buffers."
  (nconc (list "Custom"
	       (customize-menu-create 'customize))
	 (mapcar (lambda (arg)
		   (let ((tag     (nth 0 arg))
			 (command (nth 1 arg))
                         (visible (nth 2 arg))
                         (help    (nth 3 arg))
                         (active  (nth 6 arg)))
                     (vector tag command :visible (eval visible)
                             :active
                             `(or (eq t ',active)
                                  (seq-some ,(lambda (widget)
                                               (memq
                                                (widget-get widget
                                                            :custom-state)
                                                active))
                                            custom-options))
                             :help help)))
		 custom-commands)))