From b8704b52fde7568516472f1841ad49c717f445d1 Mon Sep 17 00:00:00 2001
From: Ergus <spacibba@aol.com>
Date: Tue, 24 Aug 2021 21:08:54 +0300
Subject: [PATCH] * lisp/mouse.el (context-menu-mode-map): Bind [menu] to
 context-menu-open.

https://lists.gnu.org/archive/html/emacs-devel/2021-08/msg01004.html
---
 lisp/mouse.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/mouse.el b/lisp/mouse.el
index a490aac7445..d137419e02a 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -468,6 +468,7 @@ the same menu with changes such as added new menu items."
   (let ((map (make-sparse-keymap)))
     (define-key map [mouse-3] nil)
     (define-key map [down-mouse-3] context-menu-entry)
+    (define-key map [menu] #'context-menu-open)
     (when (featurep 'ns)
       (define-key map [C-mouse-1] nil)
       (define-key map [C-down-mouse-1] context-menu-entry))
-- 
2.39.2