master d54ffa2: Define a substitute for <menu> on MS-Windows

[Eli Zaretskii]

branch: master
commit d54ffa25bd297f9bc57918ca65db714beade7473
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>

    Define a substitute for <menu> on MS-Windows
    
    * lisp/mouse.el (context-menu-mode-map): On w32, use <apps>
    in addition to (the mostly non-existent) <menu>.
---
 lisp/mouse.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lisp/mouse.el b/lisp/mouse.el
index d137419..8b20963 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -469,6 +469,8 @@ the same menu with changes such as added new menu items."
     (define-key map [mouse-3] nil)
     (define-key map [down-mouse-3] context-menu-entry)
     (define-key map [menu] #'context-menu-open)
+    (if (featurep 'w32)
+        (define-key map [apps] #'context-menu-open))
     (when (featurep 'ns)
       (define-key map [C-mouse-1] nil)
       (define-key map [C-down-mouse-1] context-menu-entry))