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

Use (Int,Int,Int,Int) for arbitrary gaps on any side of the screen

Browse Source
This commit is contained in:
Don Stewart
2007-05-28 02:51:35 +00:00
parent b0cfe9b6ab
commit 1d2c5ca35a
4 changed files with 28 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
Config.hs
View File

@@ -49,9 +49,14 @@ defaultDelta = 3%100
defaultWindowsInMaster :: Int
defaultWindowsInMaster = 1
-- Default height of gap at top of screen for a menu bar (e.g. 15)
defaultStatusGap :: Int
defaultStatusGap = 0 -- 15 for default dzen
-- Default offset of drawable screen boundary from physical screen.
-- Anything non-zero here will leave a gap of that many pixels on the
-- given edge. A useful gap at top of screen for a menu bar (e.g. 15)
--
-- Fields are: top, bottom, left, right.
--
defaultGap :: (Int,Int,Int,Int)
defaultGap = (0,0,0,0) -- 15 for default dzen
-- numlock handling:
--
@@ -115,7 +120,7 @@ keys = M.fromList $
, ((modMask , xK_period), sendMessage (IncMasterN (-1))) -- @@ Deincrement the number of windows in the master area
-- toggle the status bar gap
, ((modMask , xK_b ), modifyGap (\n -> if n == 0 then defaultStatusGap else 0)) -- @@ Toggle the status bar gap
, ((modMask , xK_b ), modifyGap (\n -> if n == defaultGap then (0,0,0,0) else defaultGap)) -- @@ Toggle the status bar gap
-- quit, or restart
, ((modMask .|. shiftMask, xK_q ), io (exitWith ExitSuccess)) -- @@ Quit xmonad