diff options
| author | Roland McGrath | 1993-07-02 18:31:59 +0000 |
|---|---|---|
| committer | Roland McGrath | 1993-07-02 18:31:59 +0000 |
| commit | e2bfb60a535fde20bdcd3c4123b1651629be75eb (patch) | |
| tree | 93f73d744ba1933c893af88ff38079741f942c98 | |
| parent | b4ff4a23cb64ab2766fd3b10c09c545b5d3b5f9b (diff) | |
| download | emacs-e2bfb60a535fde20bdcd3c4123b1651629be75eb.tar.gz emacs-e2bfb60a535fde20bdcd3c4123b1651629be75eb.zip | |
Put mouse-menu-choose-yank binding after paste=>yank binding in menu.
| -rw-r--r-- | lisp/menu-bar.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index e084157ccb0..fa4352a9e57 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el | |||
| @@ -136,8 +136,9 @@ A subsequent \\[yank] yanks the choice just selected." | |||
| 136 | (current-kill 0)))))) | 136 | (current-kill 0)))))) |
| 137 | (put 'mouse-menu-choose-yank 'menu-enable 'kill-ring) | 137 | (put 'mouse-menu-choose-yank 'menu-enable 'kill-ring) |
| 138 | 138 | ||
| 139 | (define-key menu-bar-edit-menu [choose-selection] | 139 | (define-key-after menu-bar-edit-menu [choose-selection] |
| 140 | '("Choose Pasting Selection" . mouse-menu-choose-yank)) | 140 | '("Choose Pasting Selection" . mouse-menu-choose-yank) |
| 141 | 'paste) | ||
| 141 | 142 | ||
| 142 | (define-key global-map [menu-bar buffer] '("Buffers" . mouse-menu-bar-buffers)) | 143 | (define-key global-map [menu-bar buffer] '("Buffers" . mouse-menu-bar-buffers)) |
| 143 | 144 | ||