twin/xmonad
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad.git synced 2025-08-05 22:51:54 -07:00
Code Issues Packages Projects Releases Wiki Activity

Eliminate Operations.sink too

Browse Source
This commit is contained in:
Spencer Janssen
2007-09-17 21:40:52 +00:00
parent e87a111a50
commit c6f346f887
2 changed files with 1 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Config.hs
View File

@@ -153,7 +153,7 @@ keys = M.fromList $
, ((modMask, xK_h ), sendMessage Shrink) -- %! Shrink the master area , ((modMask, xK_h ), sendMessage Shrink) -- %! Shrink the master area
, ((modMask, xK_l ), sendMessage Expand) -- %! Expand 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 -- 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 , ((modMask , xK_comma ), sendMessage (IncMasterN 1)) -- %! Increment the number of windows in the master area

4
Operations.hs
View File

@@ -451,10 +451,6 @@ initColor dpy c = (color_pixel . fst) `liftM` allocNamedColor dpy colormap c
------------------------------------------------------------------------ ------------------------------------------------------------------------
-- | Floating layer support -- | Floating layer support
-- | Make a floating window tiled
sink :: Window -> X ()
sink = windows . W.sink
-- | Make a tiled window floating, using its suggested rectangle -- | Make a tiled window floating, using its suggested rectangle
float :: Window -> X () float :: Window -> X ()
float w = withDisplay $ \d -> do float w = withDisplay $ \d -> do