diff options
-rw-r--r-- | Config.hs | 2 | ||||
-rw-r--r-- | Operations.hs | 4 |
2 files changed, 1 insertions, 5 deletions
@@ -153,7 +153,7 @@ keys = M.fromList $ , ((modMask, xK_h ), sendMessage Shrink) -- %! Shrink the master area , ((modMask, xK_l ), sendMessage Expand) -- %! Expand the master area - , ((modMask, xK_t ), withFocused sink) -- %! Push window back into tiling + , ((modMask, xK_t ), withFocused $ windows . W.sink) -- %! Push window back into tiling -- increase or decrease number of windows in the master area , ((modMask , xK_comma ), sendMessage (IncMasterN 1)) -- %! Increment the number of windows in the master area diff --git a/Operations.hs b/Operations.hs index ae95d9e..e516381 100644 --- a/Operations.hs +++ b/Operations.hs @@ -451,10 +451,6 @@ initColor dpy c = (color_pixel . fst) `liftM` allocNamedColor dpy colormap c ------------------------------------------------------------------------ -- | Floating layer support --- | Make a floating window tiled -sink :: Window -> X () -sink = windows . W.sink - -- | Make a tiled window floating, using its suggested rectangle float :: Window -> X () float w = withDisplay $ \d -> do |