diff --git a/.config/xmonad/xmobar-bottom.hs b/.config/xmonad/xmobar-bottom.hs new file mode 100644 index 0000000..9ad0fee --- /dev/null +++ b/.config/xmonad/xmobar-bottom.hs @@ -0,0 +1,24 @@ +import Xmobar + +config :: Config +config = + defaultConfig + { font = "Terminus 8", + textOffset = 0, + bgColor = "#121212", + fgColor = "#cccccc", + position = Bottom, + template = " %disk-root% %disk-home% | %local-ip% | %ssid% }{ %now-playing% | %volume% ", + commands = + [ Run XMonadLog, + Run $ Com "monitors" ["local_ip"] "local-ip" 6000, + Run $ Com "monitors" ["ssid"] "ssid" 6000, + Run $ Com "monitors" ["disk", "/"] "disk-root" 6000, + Run $ Com "monitors" ["disk", "/home"] "disk-home" 6000, + Run $ PipeReader "/tmp/pipe-volume" "volume", + Run $ PipeReader "/tmp/pipe-now-playing" "now-playing" + ] + } + +main :: IO () +main = xmobar config diff --git a/.config/xmonad/xmobar-top.hs b/.config/xmonad/xmobar-top.hs new file mode 100644 index 0000000..7bbdda9 --- /dev/null +++ b/.config/xmonad/xmobar-top.hs @@ -0,0 +1,24 @@ +import Xmobar + +config :: Config +config = + defaultConfig + { font = "Terminus 8", + textOffset = 0, + bgColor = "#121212", + fgColor = "#cccccc", + position = Top, + template = " %XMonadLog% }{ \57958 %cpu% | \61381 %memory% | %load% | %battery% | %date% ", + commands = + [ Run XMonadLog, + Run $ PipeReader "/tmp/pipe-volume" "volume", + Run $ Com "monitors" ["battery"] "battery" 3600, + Run $ Com "monitors" ["cpu"] "cpu" 50, + Run $ Com "monitors" ["memory"] "memory" 50, + Run $ Com "monitors" ["load"] "load" 100, + Run $ Date "%m/%d/%Y %H:%M:%S" "date" 10 + ] + } + +main :: IO () +main = xmobar config diff --git a/.config/xmonad/xmobar.hs b/.config/xmonad/xmobar.hs deleted file mode 100644 index 99ececc..0000000 --- a/.config/xmonad/xmobar.hs +++ /dev/null @@ -1,24 +0,0 @@ -import Xmobar - -config :: Config -config = defaultConfig - { font = "Terminus 8" - , textOffset = 0 - , bgColor = "#121212" - , fgColor = "#cccccc" - , position = Top - , template = " %XMonadLog% }{ %network% | VOL %volume% | %battery% | CPU %cpu% | RAM %memory% | %load% | %date% " - , commands = - [ Run XMonadLog - , Run $ Com "monitors" ["network"] "network" 6000 - , Run $ PipeReader "/tmp/pipe-volume" "volume" - , Run $ Com "monitors" ["battery"] "battery" 3600 - , Run $ Com "monitors" ["cpu"] "cpu" 50 - , Run $ Com "monitors" ["memory"] "memory" 50 - , Run $ Com "monitors" ["load"] "load" 600 - , Run $ Date "%d/%m/%Y %H:%M:%S" "date" 10 - ] - } - -main :: IO () -main = xmobar config diff --git a/.config/xmonad/xmonad-frosty.cabal b/.config/xmonad/xmonad-frosty.cabal index beb8aea..5a3b5e9 100644 --- a/.config/xmonad/xmonad-frosty.cabal +++ b/.config/xmonad/xmonad-frosty.cabal @@ -16,8 +16,21 @@ executable xmonad default-language: GHC2021 default-extensions: ImportQualifiedPost -executable xmobar - main-is: xmobar.hs +executable xmobar-top + main-is: xmobar-top.hs + ghc-options: + -O2 -Wall -Wcompat -Wincomplete-record-updates + -Wredundant-constraints -rtsopts -threaded -with-rtsopts=-N + + build-depends: + , base + , xmobar >=0.48 + + default-language: GHC2021 + default-extensions: ImportQualifiedPost + +executable xmobar-bottom + main-is: xmobar-bottom.hs ghc-options: -O2 -Wall -Wcompat -Wincomplete-record-updates -Wredundant-constraints -rtsopts -threaded -with-rtsopts=-N