diff options
Diffstat (limited to '.config/XMonad/lib/Hooks.hs')
| -rw-r--r-- | .config/XMonad/lib/Hooks.hs | 18 |
1 files changed, 17 insertions, 1 deletions
diff --git a/.config/XMonad/lib/Hooks.hs b/.config/XMonad/lib/Hooks.hs index 45eb6e0..99bb530 100644 --- a/.config/XMonad/lib/Hooks.hs +++ b/.config/XMonad/lib/Hooks.hs @@ -13,6 +13,8 @@ import XMonad.Layout.Tabbed import XMonad.Hooks.SetWMName import XMonad.Hooks.ManageDocks +import XMonad.Hooks.ManageHelpers +import XMonad.Hooks.StatusBar.PP import XMonad.Util.SpawnOnce import XMonad.Util.Cursor @@ -21,10 +23,23 @@ import XMonad.Util.NamedScratchpad import Defaults import Scratchpads +myLemonbarPP = def { + ppCurrent = wrap ("%{B" ++ wsVisibleOccupiedBG ++ "}%{F" ++ wsVisibleOccupiedFG ++ "} ") " %{B-}%{F-}" + -- , ppVisibleNoWindows = wrap ("%{B" ++ wsVisibleBG ++ "}%{F" ++ wsVisibleFG ++ "} ") " %{B-}%{F-}" + -- , ppVisibleNoWindows = wrap "" "" + -- , ppVisible = wrap ("%{B" ++ wsVisibleBG ++ "}%{F" ++ wsVisibleFG ++ "} ") " %{B-}%{F-}" + , ppHidden = wrap ("%{B" ++ wsOccupiedBG ++ "}%{F" ++ wsOccupiedFG ++ "} ") " %{B-}%{F-}" + , ppHiddenNoWindows = wrap ("%{B" ++ wsEmptyBG ++ "}%{F" ++ wsEmptyFG ++ "} ") " %{B-}%{F-}" + , ppTitle = wrap ("%{B" ++ titleBG ++ "}%{F" ++ titleFG ++ "} ") " %{B-}%{F-}" + , ppWsSep = "" + , ppSep = "" + , ppOrder = \(ws:_:t:_) -> ["%{l}"++t++"","%{r}"++ws++""] + } + myManageHook = namedScratchpadManageHook myScratchpads <+> manageDocks <+> composeAll [ className =? "discord" --> doShift ( myWorkspaces !! 9 ) - , className =? "vlc" --> doShift ( myWorkspaces !! 6 ) + , isFullscreen --> doFullFloat ] myLayoutHook = avoidStruts $ maximize $ windowNavigation $ smartBorders $ myGap $ @@ -39,3 +54,4 @@ myStartupHook = do spawnOnce "cbatticon" setWMName "LG3D" setDefaultCursor xC_left_ptr + |