From 82b6187cd6618d52d8e6c27a152b2732c02fef52 Mon Sep 17 00:00:00 2001 From: Hektor Misplon Date: Thu, 4 May 2023 23:57:30 +0200 Subject: [PATCH] Update xmonad config --- .xmonad/xmonad.hs | 29 +++++++++++++++-------------- 1 file changed, 15 insertions(+), 14 deletions(-) diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs index e6ae607..05bdfe5 100644 --- a/.xmonad/xmonad.hs +++ b/.xmonad/xmonad.hs @@ -32,7 +32,7 @@ import XMonad.Util.Ungrab myXmobarPP :: PP myXmobarPP = def - { ppSep = tertiaryColor " | ", + { ppSep = tertiaryColor " ", ppCurrent = brackitify, ppHidden = secondaryColor, ppHiddenNoWindows = tertiaryColor, @@ -52,8 +52,8 @@ myXmobarPP = ppExtras = [logTitles formatFocused formatUnfocused] } where - brackitify = wrap "[" "]" - formatFocused = secondaryColor . brackitify . ppWindow + brackitify = wrap "〈" "〉" + formatFocused = secondaryColor . ppWindow formatUnfocused = tertiaryColor . ppWindow ppWindow = xmobarRaw . (\w -> if null w then "Untitled" else w) . shorten 16 @@ -83,16 +83,17 @@ myManageHook = -- layoutHook myLayoutHook = - smartBorders $ - -- Column layouts - threeCol - ||| threeColMid - -- Tiled layouts - -- Note: magnifier is off by default - -- (controllable usingarrow keys) - ||| magnifiercz magnificationFactorH tiled - ||| magnifiercz magnificationFactorV (Mirror tiled) + -- smartBorders $ + -- Tiled layouts + tiled + -- -- Note: magnifier is off by default + -- -- (controllable usingarrow keys) + -- ||| magnifiercz magnificationFactorH tiled + -- ||| magnifiercz magnificationFactorV (Mirror tiled) -- Single window / monocle layout + -- Column layouts + -- ||| threeColMid + -- Monocle layouts ||| Full where magnificationFactorV = 1.384 @@ -119,8 +120,8 @@ myConfig = "etc" ], -- Styling - focusedBorderColor = "#888", - normalBorderColor = "#000", + focusedBorderColor = "#000", + normalBorderColor = "#0000", borderWidth = 2, -- Hooks manageHook = myManageHook <+> manageHook def,