(menu-bar-edit-menu) <copy>: Put an explicit key binding.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 431b4e14912550ebe431400eaa67fc93d0cb4f4b..fc026751c9a6014ba2b6e2787ba02490a59cdaae 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2001-11-15  Stefan Monnier  <monnier@cs.yale.edu>
+
+       * menu-bar.el (menu-bar-edit-menu) <copy>: Put an explicit key binding.
+
 2001-11-15  Andreas Schwab  <schwab@suse.de>
 
        * progmodes/ada-mode.el (ada-add-extensions): Quote regexp special

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index e1d9669b8a2255fe096090fad20f1e0a5ba5efad..c82b2c28dedd6d305b793d75830504ddcb6d2cf2 100644 (file)
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -407,7 +407,8 @@ A large number or nil slows down menu responsiveness."
 (define-key menu-bar-edit-menu [copy]
   '(menu-item "Copy" menu-bar-kill-ring-save
              :enable mark-active
-             :help "Copy text in region between mark and current position"))
+             :help "Copy text in region between mark and current position"
+             :keys "\\[kill-ring-save]"))
 (define-key menu-bar-edit-menu [cut]
   '(menu-item "Cut" kill-region
              :enable (and mark-active (not buffer-read-only))