From 73e00b8517ec97e5c7c6041eab30b4b0ddfb5d30 Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Thu, 19 Nov 2020 02:19:19 +0100 Subject: [PATCH 1/2] Preload easymenu.el * lisp/loadup.el: Preload easymenu. It turns out that it is already loaded in a default Emacs 27. --- lisp/emacs-lisp/easymenu.el | 4 ---- lisp/loadup.el | 1 + 2 files changed, 1 insertion(+), 4 deletions(-) diff --git a/lisp/emacs-lisp/easymenu.el b/lisp/emacs-lisp/easymenu.el index bcd5cfd99b..68b0a27b6a 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 @@ easy-menu-binding "")) (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 @@ easy-menu-avoid-duplicate-keys 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 @@ easy-menu-make-symbol (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 diff --git a/lisp/loadup.el b/lisp/loadup.el index d60aa2ead2..c16cd61594 100644 --- a/lisp/loadup.el +++ b/lisp/loadup.el @@ -266,6 +266,7 @@ (load "isearch") (load "rfn-eshadow") +(load "emacs-lisp/easymenu") (load "menu-bar") (load "tab-bar") (load "emacs-lisp/lisp") -- 2.30.0