diff --git a/xmonad.hs b/xmonad.hs index dce5297..28e1bce 100755 --- a/xmonad.hs +++ b/xmonad.hs @@ -99,7 +99,7 @@ toggleHomeScreens = do \date \"+%a, %b %d %T\"; \n\ \/usr/bin/sed -E \"s/($(date +%_d)\b)/^fg(green)\1^fg()/\" ; \n\ \sleep 1; \n\ - \done | dzen2 -dock -p -x 1615 -w 325 -u -h 24 -ta l -sa c -fn 'xos4 Terminus:Regular:Pixelsize=12' &" + \done | dzen2 -dock -p -x 1500 -w 425 -u -h 24 -ta l -sa c -fn 'xos4 Terminus:Regular:Pixelsize=12' &" else if sc == 3 then do @@ -221,7 +221,9 @@ fadeHook = fadeInactiveLogHook fadeAmount makeLauncher yargs run exec close = concat ["exe=`yegonesh ", yargs, "` && ", run, " ", exec, "$exe", close] -launcher = makeLauncher "-x -- -nf grey -nb black -fn 'xos4 Terminus:style=Regular:pixelsize=16'" "eval" "\"exec " "\"" +launcher = makeLauncher "-x -- -nf grey -nb black -fn 'xos4 Terminus:style=Regular:Pixelsize=16'" "eval" "\"exec " "\"" + +flags = "-e onstart lower -w 800 -h 24 -ta l -fg #aaaaaa -bg #000000 -fn 'xos4 Terminus:style=Regular:Pixelsize=12'" main = do dzenCenterBar <- spawnPipe centerBar @@ -243,18 +245,19 @@ main = do , startupHook = docksStartupHook <+> myStartup } `additionalKeys` myKeys + myStartup :: X () myStartup = do setWMName "LG3D" toggleHomeScreens - spawn "trayer --edge top --align right --widthtype request --margin 325 --expand false --align right --SetDockType true --SetPartialStrut false --tint 0x000000 --transparent true --alpha 0 --height 24 --monitor 'primary'" + spawn "trayer --edge top --align right --widthtype request --margin 425 --expand false --align right --SetDockType true --SetPartialStrut false --tint 0x000000 --transparent true --alpha 0 --height 32 --monitor 'primary'" --spawn "gnome-gmail-notifier" spawn "xset dpms 600" spawn "xautolock -secure -time 10 -locker 'i3lock -c 000000 -i /home/trey/images/black.png'" myBitmapsDir = "/home/trey/.xmonad/dzen2" --leftBar = "dzen2 -w 0 -h 24 -ta l -fg #555753 -bg #000000 -fn Terminus-10 -xs 1" -centerBar = "dzen2 -dock -p -x 1921 -ta l -w 960 -e 'onstart:lower;button2=togglehide' -fg #555753 -bg #000000 -fn 'xos4 Terminus:style=Regular:size=12,xftSymbola'" +centerBar = "dzen2 -dock -p -x 2060 -ta l -w 1024 -e 'onstart:lower;button2=togglehide' -fg #555753 -bg #000000 -fn 'xos4 Terminus:style=Regular:size=12'" -- rightBar = "dzen2 -w 3840 -h 24 -ta r -fg #555753 -bg #000000 -fn Terminus-10 -xs 2" myLogHook :: Handle -> X ()