From 06eb14fbeb568639404496a2dc6a0fe6cdd3d7b7 Mon Sep 17 00:00:00 2001
From: Dana Jansens <danakj@orodu.net>
Date: Sat, 4 Jan 2003 01:21:04 +0000
Subject: [PATCH] better focusing. support for the take_focus protocol

---
 src/client.cc | 23 +++++++++++++++++++++--
 src/screen.cc |  3 ++-
 src/screen.hh |  6 ++++++
 3 files changed, 29 insertions(+), 3 deletions(-)

diff --git a/src/client.cc b/src/client.cc
index a12ec941..15f44349 100644
--- a/src/client.cc
+++ b/src/client.cc
@@ -934,9 +934,28 @@ void OBClient::shade(bool shade)
 
 bool OBClient::focus()
 {
-  if (!_can_focus || _focused) return false;
+  if (!(_can_focus || _focus_notify) || _focused) return false;
+
+  if (_can_focus)
+    XSetInputFocus(otk::OBDisplay::display, _window, RevertToNone, CurrentTime);
+
+  if (_focus_notify) {
+    XEvent ce;
+    const otk::OBProperty *property = Openbox::instance->property();
+    
+    ce.xclient.type = ClientMessage;
+    ce.xclient.message_type =  property->atom(otk::OBProperty::wm_protocols);
+    ce.xclient.display = otk::OBDisplay::display;
+    ce.xclient.window = _window;
+    ce.xclient.format = 32;
+    ce.xclient.data.l[0] = property->atom(otk::OBProperty::wm_take_focus);
+    ce.xclient.data.l[1] = Openbox::instance->lastTime();
+    ce.xclient.data.l[2] = 0l;
+    ce.xclient.data.l[3] = 0l;
+    ce.xclient.data.l[4] = 0l;
+    XSendEvent(otk::OBDisplay::display, _window, False, NoEventMask, &ce);
+  }
 
-  XSetInputFocus(otk::OBDisplay::display, _window, RevertToNone, CurrentTime);
   return true;
 }
 
diff --git a/src/screen.cc b/src/screen.cc
index 18105f2a..e13e805a 100644
--- a/src/screen.cc
+++ b/src/screen.cc
@@ -361,7 +361,8 @@ void OBScreen::setSupportedAtoms()
 
   // convert to the atom values
   for (int i = 0; i < num_supported; ++i)
-    supported[i] = Openbox::instance->property()->atom(supported[i]);
+    supported[i] =
+      Openbox::instance->property()->atom((otk::OBProperty::Atoms)supported[i]);
   
   Openbox::instance->property()->set(_info->rootWindow(),
                                      otk::OBProperty::net_supported,
diff --git a/src/screen.hh b/src/screen.hh
index fa286764..91cf65c3 100644
--- a/src/screen.hh
+++ b/src/screen.hh
@@ -89,11 +89,17 @@ private:
   //!  An offscreen window which gets focus when nothing else has it
   Window _focuswindow;
 
+  //! An offscreen window which shows that a NETWM compliant window manager is
+  //! running
+  Window _supportwindow;
+
   //! A list of all managed clients on the screen, in their stacking order
   ClientList _stacking;
 
   //! Calculate the OBScreen::_area member
   void calcArea();
+  //! Set the list of supported NETWM atoms on the root window
+  void setSupportedAtoms();
   //! Set the client list on the root window
   /*!
     Sets the _NET_CLIENT_LIST root window property.<br>
-- 
2.45.2