aboutsummaryrefslogtreecommitdiffstats
path: root/Operations.hs
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--Operations.hs2
1 files changed, 1 insertions, 1 deletions
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.