diff options
| author | Karl Heuer <kwzh@gnu.org> | 1994-05-07 00:22:05 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1994-05-07 00:22:05 +0000 |
| commit | 172d2c6e6ead8293557f203dd3be3fd125ad7b2e (patch) | |
| tree | 0cd1e4b557471060c07f110704a53e4b67666653 /lisp/loadup.el | |
| parent | 6f2c86fa800bd2f327600c6d32ffe0387b3c5b16 (diff) | |
| download | emacs-172d2c6e6ead8293557f203dd3be3fd125ad7b2e.tar.gz | |
Don't precompute keybinding cache for menubar. Now done in startup.el instead.
Diffstat (limited to 'lisp/loadup.el')
| -rw-r--r-- | lisp/loadup.el | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/lisp/loadup.el b/lisp/loadup.el index 6f5b290348f..2f39713e6aa 100644 --- a/lisp/loadup.el +++ b/lisp/loadup.el @@ -114,17 +114,6 @@ ;; We specify .el in case someone compiled version.el by mistake. (load "version.el") -;; Precompute the keyboard equivalents in the menu bar items. -(if (fboundp 'x-popup-menu) - (let ((submap (lookup-key global-map [menu-bar]))) - (while submap - (and (consp (car submap)) - (symbolp (car (car submap))) - (stringp (car-safe (cdr (car submap)))) - (keymapp (cdr (cdr (car submap)))) - (x-popup-menu nil (cdr (cdr (car submap))))) - (setq submap (cdr submap))))) - ;If you want additional libraries to be preloaded and their ;doc strings kept in the DOC file rather than in core, ;you may load them with a "site-load.el" file. |