* lisp/term/w32-win.el ([noname]): Bind to 'ignore'. (Bug#36083)

diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el
index 39f393fcf985ee4603cc48d09cef9075e135049f..12c3e97e411a439b928a20552df0915d0030558f 100644 (file)
--- a/lisp/term/w32-win.el
+++ b/lisp/term/w32-win.el
@@ -170,6 +170,15 @@ the last file dropped is selected."
 ;; new layout/language selected by the user.
 (global-set-key [language-change] 'ignore)
 
+;; Some Windows applications send the 'noname' (VK_NONAME) pseudo-key
+;; to prevent Windows from sleeping.  We want to ignore these key
+;; events, to avoid annoying users by ringing the bell and announcing
+;; that the key is not bound.
+(global-set-key [noname]   'ignore)
+(global-set-key [C-noname] 'ignore)
+(global-set-key [M-noname] 'ignore)
+
+
 (defvar x-resource-name)
 
 \f