Commit b289b04e authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(menu-bar-edit-menu): Rename menu item to

Choose Next Paste.  Create this item along with all the others.
parent 285eb5ef
......@@ -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))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment