From 69e6b87329971e905cddfc32cedd7163b503c1f0 Mon Sep 17 00:00:00 2001 From: MikunoNaka Date: Sat, 26 Jun 2021 15:00:12 +0530 Subject: Turned on smartBorders in XMonad --- .config/XMonad/xmonad.hs | 10 ++-------- 1 file changed, 2 insertions(+), 8 deletions(-) (limited to '.config/XMonad') diff --git a/.config/XMonad/xmonad.hs b/.config/XMonad/xmonad.hs index 2272822..f8d0026 100644 --- a/.config/XMonad/xmonad.hs +++ b/.config/XMonad/xmonad.hs @@ -224,13 +224,6 @@ wGap = 10 -- window gap myGap = spacingRaw True (Border sGap sGap sGap sGap) True (Border wGap wGap wGap wGap) True myGap' = spacingRaw False (Border sGap sGap sGap sGap) True (Border wGap wGap wGap wGap) True -myLayoutHook = avoidStruts $ maximize $ windowNavigation $ ( - myGap' emptyBSP - ||| smartBorders (tabbed shrinkText myTabTheme) - ||| smartBorders (myGap emptyBSP) - ||| smartBorders (myGap Grid) - ) - main :: IO () main = do xmonad $ ewmh $ docks $ fullscreenSupport def { @@ -240,7 +233,8 @@ main = do , workspaces = myWorkspaces , normalBorderColor = "#130F23" , focusedBorderColor = "#BF00FF" - , layoutHook = myLayoutHook + , layoutHook = avoidStruts $ maximize $ windowNavigation $ smartBorders $ myGap $ ( + emptyBSP ||| tabbed shrinkText myTabTheme ||| emptyBSP ||| Grid) , manageHook = namedScratchpadManageHook myScratchpads <+> manageDocks , startupHook = myStartupHook } `additionalMouseBindings` [ -- cgit v1.2.3