diff options
author | Vidhu Kant Sharma <vidhukant@vidhukant.xyz> | 2022-09-12 10:19:13 +0530 |
---|---|---|
committer | Vidhu Kant Sharma <vidhukant@vidhukant.xyz> | 2022-09-12 10:19:13 +0530 |
commit | f300ba9a9302e70dcc72523639aecc1e04feec53 (patch) | |
tree | c5082bb03ddb1e1eeab84da22cbfcb47a089f279 /.config/XMonad | |
parent | d45546d4e53f149dc6ab2fc0e3ee020427b6c01e (diff) |
switched back to polybar
Diffstat (limited to '.config/XMonad')
-rw-r--r-- | .config/XMonad/lib/Defaults.hs | 34 | ||||
-rw-r--r-- | .config/XMonad/xmonad.hs | 9 |
2 files changed, 22 insertions, 21 deletions
diff --git a/.config/XMonad/lib/Defaults.hs b/.config/XMonad/lib/Defaults.hs index f4779d1..9c83de6 100644 --- a/.config/XMonad/lib/Defaults.hs +++ b/.config/XMonad/lib/Defaults.hs @@ -6,8 +6,9 @@ import XMonad.Layout.Tabbed import XMonad.Actions.GridSelect import XMonad.Util.Loggers -import XMonad.Hooks.StatusBar -import XMonad.Hooks.StatusBar.PP +-- import XMonad.Hooks.StatusBar +-- import XMonad.Hooks.StatusBar.PP + myBorder = "#120F23" myBorder' = "#C44CF2" @@ -98,18 +99,17 @@ myGSConfig colorizer = (buildDefaultGSConfig myGSColorizer) myGridSelect = myGSConfig myGSColorizer -myLemonbarCmd = "lemon | lemonbar -g 1920x28+1920+0 -o -2 -f 'Source Han Sans JP Normal:size=12' -B '#e6100b13' -F '#9d00ff'" -myLemonbarPP = def { - ppCurrent = wrap "%{B#ff0aa3} %{F#FFFFFF}" " %{F-}%{B-}" - , ppVisible = wrap "%{B#28c78f} %{F#FFFFFF}" " %{F-}%{B-}" - , ppHidden = wrap "%{B#9b1bed} %{F#FFFFFF}" " %{F-}%{B-}" - , ppHiddenNoWindows = wrap " " " " - --, ppVisibleNoWindows = wrap "%{B#ffffff} %{F#9b1bed}" " %{F-}%{B-}" - , ppWsSep = "" - , ppSep = "" - , ppTitle = wrap " " "%{r}" . shorten 60 - , ppOrder = \(ws:l:t:ex) -> [t]++[ws] - } - -myLemonbarCmd' = "lemon | lemonbar -g 1920x20+0+0 -o 0 -f 'Source Han Sans JP Normal:size=9' -B '#e6100b13' -F '#9d00ff'" -myLemonbarPP' = myLemonbarPP +-- myLemonbarCmd = "lemon | lemonbar -d -g 1920x28+1920+0 -o -2 -f 'Source Han Sans JP Normal:size=12' -B '#e6100b13' -F '#9d00ff'" +-- myLemonbarCmd' = "lemon | lemonbar -d -g 1920x20+0+0 -o 0 -f 'Source Han Sans JP Normal:size=9' -B '#e6100b13' -F '#9d00ff'" +-- +-- myLemonbarPP = def { +-- ppCurrent = wrap "%{B#ff0aa3} %{F#FFFFFF}" " %{F-}%{B-}" +-- , ppVisible = wrap "%{B#28c78f} %{F#FFFFFF}" " %{F-}%{B-}" +-- , ppHidden = wrap "%{B#9b1bed} %{F#FFFFFF}" " %{F-}%{B-}" +-- , ppHiddenNoWindows = wrap " " " " +-- --, ppVisibleNoWindows = wrap "%{B#ffffff} %{F#9b1bed}" " %{F-}%{B-}" +-- , ppWsSep = "" +-- , ppSep = "" +-- , ppTitle = wrap " " "" . shorten 60 +-- , ppOrder = \(ws:l:t:ex) -> [t]++["%{r}",ws] +-- } diff --git a/.config/XMonad/xmonad.hs b/.config/XMonad/xmonad.hs index c7f3ac0..6a4626d 100644 --- a/.config/XMonad/xmonad.hs +++ b/.config/XMonad/xmonad.hs @@ -4,11 +4,11 @@ import XMonad import XMonad.Hooks.ManageDocks import XMonad.Hooks.EwmhDesktops +-- import XMonad.Hooks.StatusBar import XMonad.Util.EZConfig import XMonad.Util.Run -import XMonad.Hooks.StatusBar import Keybindings import Defaults @@ -16,9 +16,10 @@ import Hooks main :: IO () main = do - myLemonbar <- statusBarPipe myLemonbarCmd (pure myLemonbarPP ) - myLemonbar' <- statusBarPipe myLemonbarCmd' (pure myLemonbarPP') - xmonad $ withSB myLemonbar $ withSB myLemonbar' $ ewmhFullscreen $ ewmh $ docks def { + -- myLemonbar <- statusBarPipe myLemonbarCmd (pure myLemonbarPP) + -- myLemonbar' <- statusBarPipe myLemonbarCmd' (pure myLemonbarPP) + -- xmonad $ withSB (myLemonbar <> myLemonbar') $ ewmhFullscreen $ docks def { + xmonad $ ewmhFullscreen $ ewmh $ docks def { focusFollowsMouse = True , terminal = myTerminal , borderWidth = myBorderWidth |