diff options
| author | Juri Linkov <juri@linkov.net> | 2021-12-08 22:31:55 +0200 |
|---|---|---|
| committer | Juri Linkov <juri@linkov.net> | 2021-12-08 22:31:55 +0200 |
| commit | 00d107ebead8d710cbe339d9af717e6eb2f9f2ff (patch) | |
| tree | 97be49f694ee934bc8d0ebccbbb3385144d30f40 /lisp/mouse.el | |
| parent | 6cf358d7a270ce6fc7d032187fe042a9bf234240 (diff) | |
| download | emacs-00d107ebead8d710cbe339d9af717e6eb2f9f2ff.tar.gz emacs-00d107ebead8d710cbe339d9af717e6eb2f9f2ff.tar.bz2 emacs-00d107ebead8d710cbe339d9af717e6eb2f9f2ff.zip | |
* lisp/mouse.el (context-menu-entry): Bind to make-sparse-keymap, not ignore.
Then where-is-internal does not run context-menu-map from the :filter,
and no context menu functions are called by e.g. describe-mode in wrong buffer
(bug#9923)
Diffstat (limited to 'lisp/mouse.el')
| -rw-r--r-- | lisp/mouse.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el index 459cce4cd97..13dda5ca883 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -524,7 +524,7 @@ Some context functions add menu items below the separator." menu) (defvar context-menu-entry - `(menu-item ,(purecopy "Context Menu") ignore + `(menu-item ,(purecopy "Context Menu") ,(make-sparse-keymap) :filter (lambda (_) (context-menu-map))) "Menu item that creates the context menu and can be bound to a mouse key.") |