final configuration of xmonad

This commit is contained in:
Felix Van der Jeugt 2016-08-28 09:12:49 +02:00
parent c090461b65
commit 4da1d98e61
1 changed files with 5 additions and 7 deletions

View File

@ -17,8 +17,6 @@
-- --
import XMonad import XMonad
import XMonad.Layout.NoBorders
import XMonad.Hooks.ManageDocks
import Graphics.X11.ExtraTypes.XF86 import Graphics.X11.ExtraTypes.XF86
import Data.Monoid import Data.Monoid
import System.Exit import System.Exit
@ -166,7 +164,7 @@ myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $
-- Use this binding with avoidStruts from Hooks.ManageDocks. -- Use this binding with avoidStruts from Hooks.ManageDocks.
-- See also the statusBar function from Hooks.DynamicLog. -- See also the statusBar function from Hooks.DynamicLog.
-- --
, ((modm , xK_b ), sendMessage ToggleStruts) -- , ((modm , xK_b ), sendMessage ToggleStruts)
-- Quit xmonad -- Quit xmonad
, ((modm .|. shiftMask, xK_q ), io (exitWith ExitSuccess)) , ((modm .|. shiftMask, xK_q ), io (exitWith ExitSuccess))
@ -248,7 +246,7 @@ myMouseBindings (XConfig {XMonad.modMask = modm}) = M.fromList $
-- The available layouts. Note that each layout is separated by |||, -- The available layouts. Note that each layout is separated by |||,
-- which denotes layout choice. -- which denotes layout choice.
-- --
myLayoutHook = smartBorders $ avoidStruts $ Full ||| tiled myLayoutHook = Full ||| tiled
where where
-- default tiling algorithm partitions the screen into two panes -- default tiling algorithm partitions the screen into two panes
tiled = Tall nmaster delta ratio tiled = Tall nmaster delta ratio
@ -364,8 +362,8 @@ defaults = def {
-- hooks, layouts -- hooks, layouts
layoutHook = myLayoutHook, layoutHook = myLayoutHook,
manageHook = myManageHook <+> manageDocks, manageHook = myManageHook,
handleEventHook = myEventHook <+> docksEventHook, handleEventHook = myEventHook,
logHook = myLogHook, logHook = myLogHook,
startupHook = myStartupHook startupHook = myStartupHook
} }