From b8228bebad005ddb1887d41c2fab9700026e1720 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Thu, 28 Apr 1994 18:13:22 +0000
Subject: [PATCH] (x_window) [USE_X_TOOLKIT]: Call XSetWMHints.

---
 src/xfns.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/xfns.c b/src/xfns.c
index cb6255bdd29..a56a302a2b5 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -1871,6 +1871,10 @@ x_window (f, window_prompting, minibuffer_only)
   class_hints.res_class = EMACS_CLASS;
   XSetClassHint (x_current_display, XtWindow (shell_widget), &class_hints);
 
+  f->display.x->wm_hints.input = True;
+  f->display.x->wm_hints.flags |= InputHint;
+  XSetWMHints (x_current_display, FRAME_X_WINDOW (f), &f->display.x->wm_hints);
+
   hack_wm_protocols (shell_widget);
 
   /* Do a stupid property change to force the server to generate a
-- 
2.39.5