aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKarl Heuer1994-05-07 00:22:05 +0000
committerKarl Heuer1994-05-07 00:22:05 +0000
commit172d2c6e6ead8293557f203dd3be3fd125ad7b2e (patch)
tree0cd1e4b557471060c07f110704a53e4b67666653
parent6f2c86fa800bd2f327600c6d32ffe0387b3c5b16 (diff)
downloademacs-172d2c6e6ead8293557f203dd3be3fd125ad7b2e.tar.gz
emacs-172d2c6e6ead8293557f203dd3be3fd125ad7b2e.zip
Don't precompute keybinding cache for menubar. Now done in startup.el instead.
-rw-r--r--lisp/loadup.el11
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 @@
114;; We specify .el in case someone compiled version.el by mistake. 114;; We specify .el in case someone compiled version.el by mistake.
115(load "version.el") 115(load "version.el")
116 116
117;; Precompute the keyboard equivalents in the menu bar items.
118(if (fboundp 'x-popup-menu)
119 (let ((submap (lookup-key global-map [menu-bar])))
120 (while submap
121 (and (consp (car submap))
122 (symbolp (car (car submap)))
123 (stringp (car-safe (cdr (car submap))))
124 (keymapp (cdr (cdr (car submap))))
125 (x-popup-menu nil (cdr (cdr (car submap)))))
126 (setq submap (cdr submap)))))
127
128;If you want additional libraries to be preloaded and their 117;If you want additional libraries to be preloaded and their
129;doc strings kept in the DOC file rather than in core, 118;doc strings kept in the DOC file rather than in core,
130;you may load them with a "site-load.el" file. 119;you may load them with a "site-load.el" file.