[Emacs-diffs] Changes to emacs/lisp/emulation/edt.el, v [EMACS_22_BASE]

[Chong Yidong]

CVSROOT:        /sources/emacs
Module name:    emacs
Branch:         EMACS_22_BASE
Changes by:     Chong Yidong <cyd>      08/08/18 19:09:23

Index: edt.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emulation/edt.el,v
retrieving revision 1.52.2.2
retrieving revision 1.52.2.3
diff -u -b -r1.52.2.2 -r1.52.2.3
--- edt.el      7 Jan 2008 01:09:47 -0000       1.52.2.2
+++ edt.el      18 Aug 2008 19:09:23 -0000      1.52.2.3
@@ -2230,7 +2230,11 @@
         (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."