summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMatthias Schiffer <mschiffer@universe-factory.net>2011-07-18 14:16:53 +0200
committerMatthias Schiffer <mschiffer@universe-factory.net>2011-07-18 14:16:53 +0200
commit527abbe03a87d4c352ad719967b2c4cdff545dfa (patch)
tree08d4f47d5dcea27724840fe3b55be95952896a18
parente29db941e75488dfafc4268b5c8f297de1381bad (diff)
downloadxmonad-conf-527abbe03a87d4c352ad719967b2c4cdff545dfa.tar
xmonad-conf-527abbe03a87d4c352ad719967b2c4cdff545dfa.zip
The last fix wasn't a good idea after all...
-rw-r--r--xmonad.hs9
1 files changed, 1 insertions, 8 deletions
diff --git a/xmonad.hs b/xmonad.hs
index a9c321d..55868b8 100644
--- a/xmonad.hs
+++ b/xmonad.hs
@@ -108,17 +108,10 @@ myStartupHook = do
isUtility :: Query Bool
isUtility = isInProperty "_NET_WM_WINDOW_TYPE" "_NET_WM_WINDOW_TYPE_UTILITY"
-moveToBottom :: ManageHook
-moveToBottom = doF $ \windowSet@W.StackSet {W.current = screen@W.Screen {W.workspace = ws@W.Workspace {W.stack = windowStack}}} ->
- let windowStack' = fmap (\(W.Stack f u d) -> W.Stack f (reverse d ++ u) []) windowStack
- in windowSet { W.current = screen {W.workspace = ws {W.stack = windowStack'}} }
-
-
myManageHook :: ManageHook
myManageHook = composeAll
- [ moveToBottom
- , isDialog --> doFloat
+ [ isDialog --> doFloat
, composeOne
[ className =? "Guake.py" -?> doFloatMaybeFullscreen -- <+> doConfigBorderOff)
--, className =? "Do" -?> (doFloat <+> doConfigBorderOff)