From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 2 Jul 1993 21:37:09 +0000 (+0000)
Subject: (menu-bar-edit-menu): Rename menu item to
X-Git-Tag: emacs-19.34~11893
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b289b04e20f3c27a8bee7d0206df1dcab0c4bf2b;p=emacs.git

(menu-bar-edit-menu): Rename menu item to
Choose Next Paste.  Create this item along with all the others.
---

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index fa4352a9e57..6474d04817c 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -47,6 +47,8 @@
 
 (define-key menu-bar-edit-menu [fill] '("Fill" . fill-region))
 (define-key menu-bar-edit-menu [clear] '("Clear" . delete-region))
+(define-key menu-bar-edit-menu [choose-selection]
+  '("Choose Next Paste" . mouse-menu-choose-yank))
 (define-key menu-bar-edit-menu [paste] '("Paste" . yank))
 (define-key menu-bar-edit-menu [copy] '("Copy" . kill-ring-save))
 (define-key menu-bar-edit-menu [cut] '("Cut" . kill-region))
@@ -135,10 +137,6 @@ A subsequent \\[yank] yanks the choice just selected."
 	      (message "The next yank will insert the selected text.")
 	    (current-kill 0))))))
 (put 'mouse-menu-choose-yank 'menu-enable 'kill-ring)
-
-(define-key-after menu-bar-edit-menu [choose-selection]
-  '("Choose Pasting Selection" . mouse-menu-choose-yank)
-  'paste)
 
 (define-key global-map [menu-bar buffer] '("Buffers" . mouse-menu-bar-buffers))