Lines Matching defs:make
43 (make-lucid-menu-keymap "menu-bar" current-menubar)
50 (defvar lucid-menubar-map (make-sparse-keymap))
64 (defvar make-lucid-menu-keymap-disable nil)
68 (defun make-lucid-menu-keymap (menu-name menu-items)
69 (let ((menu (make-sparse-keymap menu-name)))
80 (setq command (make-lucid-menu-keymap (car item) (cdr item)))
83 (setq command (make-symbol (format "menu-function-%d"
98 'make-lucid-menu-keymap-disable))
119 (or (aref item i) 'make-lucid-menu-keymap-disable))
187 ;; It would not make sense to duplicate them here.
199 (make-local-variable 'current-menubar)