448 |
|
|
449 |
(defun easy-menu-add (menu &optional map) |
(defun easy-menu-add (menu &optional map) |
450 |
"Maybe precalculate equivalent key bindings. |
"Maybe precalculate equivalent key bindings. |
451 |
Do it if `easy-menu-precalculate-equivalent-keybindings' is on," |
Do it only if `easy-menu-precalculate-equivalent-keybindings' is on." |
452 |
(when easy-menu-precalculate-equivalent-keybindings |
(when easy-menu-precalculate-equivalent-keybindings |
453 |
(if (and (symbolp menu) (not (keymapp menu)) (boundp menu)) |
(if (and (symbolp menu) (not (keymapp menu)) (boundp menu)) |
454 |
(setq menu (symbol-value menu))) |
(setq menu (symbol-value menu))) |