Call precompute-menubar-bindings.

Then set define-key-rebound-commands to nil.

diff --git a/lisp/loadup.el b/lisp/loadup.el
index efa7816bf2fb0a6d1fe5813ceac627b76daf41b6..5bf901bce0424aed4298bac7a757a1947eeed3b0 100644 (file)
--- a/lisp/loadup.el
+++ b/lisp/loadup.el
@@ -140,6 +140,12 @@
 (if (load "site-load" t)
     (garbage-collect))
 
+(if (fboundp 'x-popup-menu)
+    (precompute-menubar-bindings))
+;; Turn on recording of which commands get rebound,
+;; for the sake of the next call to precompute-menubar-bindings.
+(setq define-key-rebound-commands nil)
+
 ;; Determine which last version number to use
 ;; based on the executables that now exist.
 (if (and (or (equal (nth 3 command-line-args) "dump")