myLayoutHook = windowNavigation $
               FS.fullscreenFocus $
               myWmii ||| wmiiLike ||| Grid
  where
     -- Default proportion of screen occupied by master pane
     ratio   = 1/2

     -- Percent of screen to increment by when resizing panes
     delta   = 3/100

     wmiiLike = wmii shrinkText def

     -- myWmii is basically the same as stock wmii,
     -- but it defaults to tabs first
     myWmii = group innerLayout zoomRowG
        where column = named "Column" $ avoidStruts $ Tall 0 delta ratio
              tabs = named "Tabs" $ avoidStruts $ Simplest
              innerLayout = renamed [CutWordsLeft 3]
                            $ addTabs shrinkText def
                            $ ignore NextLayout
                            $ ignore (LC.JumpToLayout "") $ unEscape
                                $ tabs LC.||| column LC.||| Full

------------------------------------------------------------------------
-- Window rules:

-- Execute arbitrary actions and WindowSet manipulations when managing
-- a new window. You can use this to, for example, always float a
-- particular program, or have a client always appear on a particular
-- workspace.
--
-- To find the property name associated with a program, use
-- > xprop | grep WM_CLASS
-- and click on the client you're interested in.
--
-- To match on the WM_NAME, you can use 'title' in the same way that
-- 'className' and 'resource' are used below.
--
myLayoutHook = windowNavigation $
               FS.fullscreenFocus $
               myWmii ||| wmiiLike ||| Grid
  where
     -- Default proportion of screen occupied by master pane
     ratio   = 1/2

     -- Percent of screen to increment by when resizing panes
     delta   = 3/100

     wmiiLike = wmii shrinkText def

     -- myWmii is basically the same as stock wmii,
     -- but it defaults to tabs first
     myWmii = group innerLayout zoomRowG
        where column = named "Column" $ avoidStruts $ Tall 0 delta ratio
              tabs = named "Tabs" $ avoidStruts $ Simplest
              innerLayout = renamed [CutWordsLeft 3]
                            $ addTabs shrinkText def
                            $ ignore NextLayout
                            $ ignore (LC.JumpToLayout "") $ unEscape
                                $ tabs LC.||| column LC.||| Full

------------------------------------------------------------------------
-- Window rules:

-- Execute arbitrary actions and WindowSet manipulations when managing
-- a new window. You can use this to, for example, always float a
-- particular program, or have a client always appear on a particular
-- workspace.
--
-- To find the property name associated with a program, use
-- > xprop | grep WM_CLASS
-- and click on the client you're interested in.
--
-- To match on the WM_NAME, you can use 'title' in the same way that
-- 'className' and 'resource' are used below.
--
myLayoutHook = windowNavigation $
               FS.fullscreenFocus $
               myWmii ||| wmiiLike ||| Grid
  where
     -- Default proportion of screen occupied by master pane
     ratio   = 1/2

     -- Percent of screen to increment by when resizing panes
     delta   = 3/100

     wmiiLike = wmii shrinkText def

     -- myWmii is basically the same as stock wmii,
     -- but it defaults to tabs first
     myWmii = group innerLayout zoomRowG
        where column = named "Column" $ avoidStruts $ Tall 0 delta ratio
              tabs = named "Tabs" $ avoidStruts $ Simplest
              innerLayout = renamed [CutWordsLeft 3]
                            $ addTabs shrinkText def
                            $ ignore NextLayout
                            $ ignore (LC.JumpToLayout "") $ unEscape
                                $ tabs LC.||| column LC.||| Full

------------------------------------------------------------------------
-- Window rules:

-- Execute arbitrary actions and WindowSet manipulations when managing
-- a new window. You can use this to, for example, always float a
-- particular program, or have a client always appear on a particular
-- workspace.
--
-- To find the property name associated with a program, use
-- > xprop | grep WM_CLASS
-- and click on the client you're interested in.
--
-- To match on the WM_NAME, you can use 'title' in the same way that
-- 'className' and 'resource' are used below.
--