diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2008-08-18 19:09:23 +0000 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2008-08-18 19:09:23 +0000 |
commit | 6bfebcda22fe89c82c5a45b0664ae5d6926fcaed (patch) | |
tree | 0caf7461b8b00464fd9b637c1586f6fb9b9eaef7 | |
parent | aa0585b0c2bfb903c4ca44008810f7985b1c0112 (diff) | |
download | emacs-6bfebcda22fe89c82c5a45b0664ae5d6926fcaed.tar.gz |
(edt-default-emulation-setup): Share global-buffers-menu-map with the
emulated global map.
-rw-r--r-- | lisp/emulation/edt.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/emulation/edt.el b/lisp/emulation/edt.el index 880bc0b55c6..3b180b935c7 100644 --- a/lisp/emulation/edt.el +++ b/lisp/emulation/edt.el @@ -2230,7 +2230,11 @@ Optional argument USER-SETUP non-nil means called from function (fset 'edt-emulation-on (symbol-function 'edt-select-user-global-map))) (progn (fset 'edt-emulation-on (symbol-function 'edt-select-default-global-map)) - (edt-select-default-global-map)))) + (edt-select-default-global-map))) + ;; We need to share `global-buffers-menu-map' with the saved global + ;; keymap, because `menu-bar-update-buffers' directly changes it. + (define-key (current-global-map) [menu-bar buffer] + (cons "Buffers" global-buffers-menu-map))) (defun edt-user-emulation-setup () "Setup user custom emulation of DEC's EDT editor." |