From 912f4f963746b3d30cf13823fe0ed25d4b61daee Mon Sep 17 00:00:00 2001
From: Stefan O'Rear <stefanor@cox.net>
Date: Mon, 4 Jun 2007 03:39:38 +0200
Subject: do not cache atom values within Xmonad, instead let Xlib worry about
 caching (a documented feature)

darcs-hash:20070604013938-e3110-8dc84f03278c55076a5cf83013974689c4861ffc.gz
---
 Operations.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'Operations.hs')

diff --git a/Operations.hs b/Operations.hs
index 81df02a..ab99946 100644
--- a/Operations.hs
+++ b/Operations.hs
@@ -98,7 +98,8 @@ modifyGap f = do
 --
 kill :: X ()
 kill = withDisplay $ \d -> withFocused $ \w -> do
-    XConf {wmdelete = wmdelt, wmprotocols = wmprot} <- ask
+    wmdelt <- atom_WM_DELETE_WINDOW  ;  wmprot <- atom_WM_PROTOCOLS
+
     protocols <- io $ getWMProtocols d w
     io $ if wmdelt `elem` protocols
         then allocaXEvent $ \ev -> do
-- 
cgit v1.2.3