rename workspaces to tokipona
la-ninpre leobrekalini@gmail.com
Fri, 24 Jun 2022 14:00:50 +0300
1 files changed,
5 insertions(+),
3 deletions(-)
jump to
M
xmonad.hs
→
xmonad.hs
@@ -102,6 +102,7 @@ { ppSep = xmobarColor (col_bg_alt def) "" " | "
, ppCurrent = xmobarColor (col_fg_alt def) "" . sitelen , ppHidden = xmobarColor (col_fg def) "" . sitelen , ppHiddenNoWindows = xmobarColor (col_bg_alt def) "" . sitelen + , ppLayout = sitelen } where sitelen = xmobarFont 3@@ -129,15 +130,16 @@ $ toggleLayouts full
$ smartBorders $ tiled ||| threeCol where - tiled = renamed [Replace "lawa"] + tiled = renamed [Replace "\xe624"] -- lawa $ addTabs shrinkText myTabTheme $ subLayout [] (Simplest) $ spacingWithEdge space $ ResizableTall nmaster delta ratio [] - threeCol = renamed [Replace "supa"] + threeCol = renamed [Replace "\xe665"] -- supa $ addTabs shrinkText myTabTheme $ subLayout [] (Simplest) $ spacingWithEdge space $ ResizableThreeColMid nmaster delta ratio [] - full = renamed [Replace "suli"] $ noBorders Full + full = renamed [Replace "\xe663"] -- suli + $ noBorders Full nmaster = 1 ratio = 1/2 delta = 3/100