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 | bae38a1ffafc6c2d07892c2c651886c1252e6309 (patch) | |
| tree | cb36b8c3901aeff6b66344a688586c18ad35001a /lisp/loadup.el | |
| parent | 78c22602fe4f7c27b403edbd860a3b8bbc0f8845 (diff) | |
| download | emacs-bae38a1ffafc6c2d07892c2c651886c1252e6309.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. |