diff options
| author | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-06-11 23:33:27 +0200 |
|---|---|---|
| committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-06-11 23:33:27 +0200 |
| commit | 0aadcfada4ebb927ec26f1f5d0c1783c5fb5d429 (patch) | |
| tree | 544d57860e6d510ddd557a83c1e702e4198d7c32 | |
| parent | 80bdedf3e16ad016491e0d134aebb167c19b3356 (diff) | |
| download | xmonad-0aadcfada4ebb927ec26f1f5d0c1783c5fb5d429.tar.gz xmonad-0aadcfada4ebb927ec26f1f5d0c1783c5fb5d429.tar.xz xmonad-0aadcfada4ebb927ec26f1f5d0c1783c5fb5d429.zip | |
Set withdrawn state after calling windows
darcs-hash:20070611213327-a5988-11712c7c29061feaa296249679a7cbe7dfe402c0.gz
| -rw-r--r-- | Operations.hs | 2 |
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. |