summaryrefslogtreecommitdiff
path: root/xmonad.hs
blob: b26e45c6f6ddf973b07aed03c848876d972af8e8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
import           XMonad
import           XMonad.Config.Desktop
import           XMonad.Layout.NoBorders
import           XMonad.Layout.Tabbed

main :: IO ()
main = xmonad
    desktopConfig {
            terminal = "xterm"
--        , layoutHook = noBorders Full ||| noBorders (tabbed shrinkText def) ||| layoutHook desktopConfig
          , layoutHook = desktopLayoutModifiers layouts
          , modMask = mod4Mask
    }

  where

    layouts = noBorders Full
              ||| noBorders (tabbed shrinkText def)
              ||| smartBorders tiled
              ||| smartBorders (Mirror tiled)
    tiled = Tall nmaster delta ratio
    nmaster = 1 -- The default number of windows in the master pane
    ratio = 1 / 2 -- Default proportion of screen occupied by master pane
    delta = 3 / 100 -- Percent of screen to increment by when resizing panes