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