Mercurial > emacs

diff lisp/loadup.el @ 12299:d4e2494f12cb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Call precompute-menubar-bindings. Then set define-key-rebound-commands to nil.
author Richard M. Stallman <rms@gnu.org>
date Sat, 17 Jun 1995 23:53:23 +0000
parents 2fdc054fa4e3
children abf6a9c6e139
line wrap: on
line diff
--- a/lisp/loadup.el	Sat Jun 17 23:48:10 1995 +0000
+++ b/lisp/loadup.el	Sat Jun 17 23:53:23 1995 +0000
@@ -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")