From 9278f06a653067470caa6377d749eac60027ba09 Mon Sep 17 00:00:00 2001
From: la-ninpre <leobrekalini@gmail.com>
Date: Fri, 24 Jun 2022 14:00:50 +0300
Subject: rename workspaces to tokipona

---
 xmonad.hs | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/xmonad.hs b/xmonad.hs
index e5a9402..e290fe3 100644
--- a/xmonad.hs
+++ b/xmonad.hs
@@ -102,6 +102,7 @@ myXmobarPP = 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 @@ myLayout = windowNavigation
          $ 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
-- 
cgit v1.2.3