M xmobar/.config/xmobar/xmobar.hs → xmobar/.config/xmobar/xmobar.hs

@@ -8,19 +8,10 @@ run   Sep = return " <fc=#223333>|</fc> "
 
 config :: Config
 config = defaultConfig
-       { font = "xft:Lato:weight=bold:pixelsize=12:antialias=true:hinting=true"
-       , additionalFonts = [ "xft:Font Awesome 5 Free Solid:pixelsize=12"
-                           , "xft:Font Awesome 5 Brands:pixelsize=14"
-                           -- sitelen pona pona by jackhumbert
-                           --, "xft:sitelen\-pona:pixelsize=20:antialias=true:hinting=true"
-                           -- linja pona
-                           , "xft:linja pona:pixelsize=22:antialias=true:hinting=true"
-                           ]
+       { font = "Lato 12"
+       , additionalFonts = ["linja pona, 16"]
        , bgColor = "#111111"
        , fgColor = "#ccbbcc"
-       , border = FullB
-       , borderWidth = 1
-       , borderColor = "#223333"
        , position = Static { xpos = 8, ypos = 8, width = 1920-8*2, height = 24 }
        , lowerOnStart = True
        , hideOnStart = False
@@ -28,97 +19,55 @@ , persistent = True
        , iconRoot = ".config/xmobar/xpm/"
        , commands = [ Run $ Com "uname" ["-r"] "kern" 0
                     , Run $ Uptime
+                        -- tenpo suno nanpa
                         ["-t"
-                            -- normie
-                        --, "<fc=#7f9848><fn=1>\xf017</fn> uptime: <days>d</fc>"
-                            -- sitelen pona pona by jackhumbert
-                        --, "<fc=#7f9848><fn=3>\xee6b\xee64\xee3d</fn><days></fc>"
-                            -- linja pona
-                        -- tenpo suno nanpa
-                        , "<fn=3>\xe66b\xe664\xe63d</fn><days>"
+                        , "<fn=1>\xe66b\xe664\xe63d</fn><days>"
                         ] 60
                     , Run $ Cpu
+                        -- lawa pi ilo sona
                         ["-t"
-                            -- normie
-                        --, "<fc=#c74444><fn=1>\xf108</fn>cpu: <total>%</fc>"
-                            -- sitelen pona pona by jackhumbert
-                        --, "<fc=#c74444><fn=3>\xee24\xee4d\xee0e\xee3d</fn>: <total>%</fc>"
-                            -- linja pona
-                        , "<fn=3>\xe624\xe730\xe60e\xe63d</fn>: <total>%"
-                        -- lawa pi ilo sona
+                        , "<fn=1>\xe624\xe730\xe60e\xe63d</fn>: <total>%"
                         , "-H", "50", "--high", "#ffaaaa"
                         ] 20
                     , Run $ Memory
+                        -- poki pali
                         ["-t"
-                            -- normie
-                        --, "<fc=#d7a06d><fn=1>\xf538</fn> ram: <used>M (<usedratio>%)</fc>"
-                            -- sitelen pona pona by jackhumbert
-                        --, "<fc=#d7a06d><fn=3>\xee53\xee49</fn>: <used>M (<usedratio>%)</fc>"
-                            -- linja pona
-                        , "<fn=3>\xe653\xf174</fn>: <used>M (<usedratio>%)"
-                        -- poki pali
+                        , "<fn=1>\xe653\xf174</fn>: <used>M (<usedratio>%)"
                         ] 20
                     , Run $ DiskU
+                        -- poki awen
                         [("/home"
-                            -- normie
-                        --, "<fc=#4e96d5><fn=1>\xf0a0</fn> hdd: <free> free</fc>")
-                            -- sitelen pona pona by jackhumbert
-                        --, "<fc=#4e96d5><fn=3>\xee53\xee08</fn>: <free></fc>")
-                            -- linja pona
-                        , "<fn=3>\xe653\xf109</fn>: <free>")
-                        -- poki awen
+                        , "<fn=1>\xe653\xf109</fn>: <free>")
                         ] [] 60
                     , Run $ Kbd
-                            -- normie
-                        --[ ("us", "<fc=#55b795><fn=1>\xf11c</fn> EN</fc>")
-                        --, ("ru", "<fc=#55b795><fn=1>\xf11c</fn> RU</fc>")
-                        --]
-                            -- sitelen pona pona by jackhumbert
-                        --[ ("us", "<fc=#55b795><fn=3>\xee6c\xee4d\xee0e\xee60 inli</fn></fc>")
-                        --, ("ru", "<fc=#55b795><fn=3>\xee6c\xee4d\xee0e\xee60 losi</fn></fc>")
-                        --]
                         -- toki pi ilo sitelen
-                            -- linja pona
-                        [ ("us", "<fn=3>\xe66c\xe730\xe619\xe660 [INLI]</fn>")
-                        , ("ru", "<fn=3>\xe66c\xe730\xe619\xe660 [LOSI]</fn>")
+                        [ ("us", "<fn=1>\xe66c\xe730\xe619\xe660 [INLI]</fn>")
+                        , ("ru", "<fn=1>\xe66c\xe730\xe619\xe660 [LOSI]</fn>")
                         ]
-                        -- toki pi ilo sitelen
                     , Run $ Date
-                            -- normie
-                        --"<fc=#ceced2><fn=1>\xf017</fn> %d %b %Y %R</fc>"
-                            -- sitelen pona pona by jackhumbert
-                        --"<fc=#ceced2><fn=3>\xee6b</fn> %d-%m-%Y %R</fc>"
-                            -- linja pona
-                        "<fn=3>\xe66b</fn> %d-%m-%Y %R"
+                        "<fn=1>\xe66b</fn> %d-%m-%Y %R"
                         -- tenpo
                         "date" 50
                     , Run $ Network "wg0"
                         ["-t"
-                            -- normie
-                        --, "<fc=#ceced2><fn=1>\xf6d5</fn></fc>"
-                            -- sitelen pona pona by jackhumbert
-                        --, "<fc=#ceced2><fn=3>\xee01</fn></fc>"
-                            -- linja pona
-                        , "<fn=3>\xe601</fn>"
                         -- akesi
+                        , "<fn=1>\xe601</fn>"
                         ] 20
                     , Run Sep
                     , Run UnsafeXMonadLog
                     ]
        , sepChar = "%"
        , alignSep = "}{"
-       -- ... }{ <fc=#ceced2><fn=2></fn> ... -- normie
-       -- ... }{ <fc=#ceced2><fn=3> linu</fn> ... -- sitelen pona pona by jackhumbert
-       -- ... }{ <fc=#ceced2><fn=3> [_L_IN_U]</fn> ... -- linja pona
+       -- waso
        , template = " <action=`dmenu_run`><icon=la_ninpre.xpm/></action>\
                     \%UnsafeXMonadLog%}{\
-                    \<fn=3>\xe674 [LINU]</fn> %kern%%s%\
+                    \<fn=1>\xe674 [LINU]</fn> %kern%%s%\
                     \%uptime%%s%\
                     \<action=`alacritty -e htop`>%cpu%</action>%s%\
                     \<action=`alacritty -e htop`>%memory%</action>%s%\
                     \%disku%%s%\
                     \%kbd%%s%\
-                    \<action=`uxnemu ~/roms/clock.rom`>%date%</action>%s%\
+                    \<action=`alacritty -e calcurse`>%date%</action>%s%\
                     \%wg0%%s%"
        }