diff options
| author | Stefan Kangas <stefan@marxist.se> | 2021-02-27 15:15:29 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-02-27 15:24:35 +0100 |
| commit | cd411ecb28349f80d22488a2c2d0008eb6ad9a9e (patch) | |
| tree | c425033a0f887d04fc4a57c832fb311751a9aac0 /lisp/emacs-lisp | |
| parent | 36440b15d3552908614f0bd52f4defed8c1deed5 (diff) | |
| download | emacs-cd411ecb28349f80d22488a2c2d0008eb6ad9a9e.tar.gz emacs-cd411ecb28349f80d22488a2c2d0008eb6ad9a9e.tar.bz2 emacs-cd411ecb28349f80d22488a2c2d0008eb6ad9a9e.zip | |
Convert emacs-lisp-mode menu to easy-menu-define
* lisp/loadup.el: Preload easymenu.
* lisp/progmodes/elisp-mode.el (emacs-lisp-mode-map): Convert menu to
use easy-menu-define (bug#24774).
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/easymenu.el | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/easymenu.el b/lisp/emacs-lisp/easymenu.el index 8ddfb9e78ef..faa69241f9f 100644 --- a/lisp/emacs-lisp/easymenu.el +++ b/lisp/emacs-lisp/easymenu.el @@ -35,7 +35,6 @@ (defsubst easy-menu-intern (s) (if (stringp s) (intern s) s)) -;;;###autoload (defmacro easy-menu-define (symbol maps doc menu) "Define a pop-up menu and/or menu bar menu specified by MENU. If SYMBOL is non-nil, define SYMBOL as a function to pop up the @@ -166,7 +165,6 @@ This is expected to be bound to a mouse event." "")) (cons menu props))))) -;;;###autoload (defun easy-menu-do-define (symbol maps doc menu) ;; We can't do anything that might differ between Emacs dialects in ;; `easy-menu-define' in order to make byte compiled files @@ -218,7 +216,6 @@ If NAME is provided, it is used for the keymap." If it holds a list, this is expected to be a list of keys already seen in the menu we're processing. Else it means we're not processing a menu.") -;;;###autoload (defun easy-menu-create-menu (menu-name menu-items) "Create a menu called MENU-NAME with items described in MENU-ITEMS. MENU-NAME is a string, the name of the menu. MENU-ITEMS is a list of items @@ -474,7 +471,6 @@ When non-nil, NOEXP indicates that CALLBACK cannot be an expression (eval `(lambda () (interactive) ,callback) t))) command)) -;;;###autoload (defun easy-menu-change (path name items &optional before map) "Change menu found at PATH as item NAME to contain ITEMS. PATH is a list of strings for locating the menu that |