Call precompute-menubar-bindings.

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

1 files changed, 6 insertions, 0 deletions

diff --git a/lisp/loadup.el b/lisp/loadup.el
index efa7816bf2f..5bf901bce04 100644
--- 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")