([language-change]): For now ignore

keyboard language-change events.

1 files changed, 6 insertions, 0 deletions

diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el
index 2e00d8eb686..9593e79f531 100644
--- a/lisp/term/w32-win.el
+++ b/lisp/term/w32-win.el
@@ -169,6 +169,12 @@ the last file dropped is selected."
 (global-set-key [drag-n-drop] 'w32-drag-n-drop)
 (global-set-key [C-drag-n-drop] 'w32-drag-n-drop-other-frame)
 
+;; Keyboard layout/language change events
+;; For now ignore language-change events; in the future
+;; we should switch the Emacs Input Method to match the
+;; new layout/language selected by the user.
+(global-set-key [language-change] 'ignore)
+
 (defvar x-invocation-args)
 
 (defvar x-command-line-resources nil)