diff options
author | Juri Linkov <juri@linkov.net> | 2022-01-15 20:37:15 +0200 |
---|---|---|
committer | Juri Linkov <juri@linkov.net> | 2022-01-15 20:37:15 +0200 |
commit | 791694c5fe86b8c9ab5cb593bd5e050aa185aa3a (patch) | |
tree | c103ea71ef4fabbf1569f0d04428cf61c36d62e7 /lisp/mouse.el | |
parent | f19b34376a2fe9f6f06226fb9cb0cb92119dbdca (diff) | |
download | emacs-791694c5fe86b8c9ab5cb593bd5e050aa185aa3a.tar.gz emacs-791694c5fe86b8c9ab5cb593bd5e050aa185aa3a.tar.bz2 emacs-791694c5fe86b8c9ab5cb593bd5e050aa185aa3a.zip |
* lisp/mouse.el (context-menu-map): Select clicked window (bug#53249).
Diffstat (limited to 'lisp/mouse.el')
-rw-r--r-- | lisp/mouse.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el index 82424e3e244..502683d3d1e 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -324,6 +324,8 @@ the function `context-menu-filter-function'." (fun (mouse-posn-property (event-start click) 'context-menu-function))) + (select-window (posn-window (event-start click))) + (if (functionp fun) (setq menu (funcall fun menu click)) (run-hook-wrapped 'context-menu-functions |