diff options
| author | Richard M. Stallman <rms@gnu.org> | 1995-06-17 23:53:23 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1995-06-17 23:53:23 +0000 |
| commit | f5263a5cfc5cb6f1ae2b8c32593e1d7c7e07d2f3 (patch) | |
| tree | 1ceaadd1408a3c75bc1481b95c06103faaf10b2b /lisp/loadup.el | |
| parent | 8fbc986d8696b048df9984593ea9e19ec2415ca7 (diff) | |
| download | emacs-f5263a5cfc5cb6f1ae2b8c32593e1d7c7e07d2f3.tar.gz | |
Call precompute-menubar-bindings.
Then set define-key-rebound-commands to nil.
Diffstat (limited to 'lisp/loadup.el')
| -rw-r--r-- | lisp/loadup.el | 6 |
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") |