]> git.eshelyaron.com Git - emacs.git/commitdiff
* lisp/mouse.el (context-menu-entry): Bind to make-sparse-keymap, not ignore.
authorJuri Linkov <juri@linkov.net>
Wed, 8 Dec 2021 20:31:55 +0000 (22:31 +0200)
committerJuri Linkov <juri@linkov.net>
Wed, 8 Dec 2021 20:31:55 +0000 (22:31 +0200)
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)

lisp/mouse.el

index 459cce4cd977d26f797521f7c59a1b92dce224a6..13dda5ca8835b1f2931e26516971899b53f4a416 100644 (file)
@@ -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.")