From 0aadcfada4ebb927ec26f1f5d0c1783c5fb5d429 Mon Sep 17 00:00:00 2001
From: Spencer Janssen <sjanssen@cse.unl.edu>
Date: Mon, 11 Jun 2007 23:33:27 +0200
Subject: Set withdrawn state after calling windows

darcs-hash:20070611213327-a5988-11712c7c29061feaa296249679a7cbe7dfe402c0.gz
---
 Operations.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Operations.hs b/Operations.hs
index fb6c788..d51b1e2 100644
--- a/Operations.hs
+++ b/Operations.hs
@@ -70,8 +70,8 @@ manage w = withDisplay $ \d -> do
 --
 unmanage :: Window -> X ()
 unmanage w = do
-    setWMState w 0 {-withdrawn-}
     windows (W.sink w . W.delete w)
+    setWMState w 0 {-withdrawn-}
     modify (\s -> s {mapped = S.delete w (mapped s), waitingUnmap = M.delete w (waitingUnmap s)})
 
 -- | focus. focus window up or down. or swap various windows.
-- 
cgit v1.2.3