From f7004299364217ae84282c4bc394a0aa601e227b Mon Sep 17 00:00:00 2001 From: Trey Blancher Date: Mon, 29 Jul 2019 19:58:31 -0400 Subject: [PATCH] xmonad.hs as of 2019-07-29T19:58:45 -04:00 --- xmonad.hs | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/xmonad.hs b/xmonad.hs index b036315..1674bc6 100755 --- a/xmonad.hs +++ b/xmonad.hs @@ -90,7 +90,7 @@ toggleHomeScreens = do sc <- IS.countScreens if sc == 1 then do - spawn "xrandr --output DVI-I-2-1 --off --output DVI-I-3-2 --off" + --spawn "xrandr --output DVI-I-2-1 --off --output DVI-I-3-2 --off" spawn "while true; do \n\ \~/bin/battery; \n\ \echo -n ' '; \n\ @@ -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 1670 -w 255 -e \"onstart:lower;button1=togglecollapse\" -u -h 24 -ta l -sa c -fg #aaaaaa -bg #000000 -fn Terminus-10 &" + \done | dzen2 -dock -p -x 1615 -w 325 -u -h 24 -ta l -sa c &" else if sc == 3 then do @@ -219,7 +219,7 @@ fadeHook = fadeInactiveLogHook fadeAmount where fadeAmount = 0.8 makeLauncher yargs run exec close = concat - ["exe=`yeganesh ", yargs, "` && ", run, " ", exec, "$exe", close] + ["exe=`yegonesh ", yargs, "` && ", run, " ", exec, "$exe", close] launcher = makeLauncher "-x -- -nf grey -nb black -fn 'xos4 Terminus:style=Regular:pixelsize=16'" "eval" "\"exec " "\"" @@ -247,14 +247,14 @@ myStartup :: X () myStartup = do setWMName "LG3D" toggleHomeScreens - spawn "trayer --edge top --align right --widthtype request --margin 255 --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 325 --expand false --align right --SetDockType true --SetPartialStrut false --tint 0x000000 --transparent true --alpha 0 --height 24 --monitor 'primary'" --spawn "gnome-gmail-notifier" spawn "xset dpms 600" spawn "xautolock -secure -time 10 -locker 'i3lock -c 000000'" 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 Terminus-10 " +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=16'" -- rightBar = "dzen2 -w 3840 -h 24 -ta r -fg #555753 -bg #000000 -fn Terminus-10 -xs 2" myLogHook :: Handle -> X () @@ -371,8 +371,8 @@ myKeys = [ --, ((winKey , xK_i), spawnHere "iceweasel") --, ((winKey , xK_i), spawnHere "clementine") , ((winKey , xK_i), ifWindows (className =? "Clementine") (mapM_ killWindow) (spawnHere "clementine")) - , ((winKey , xK_d ), ifWindows (className =? "Goldendict") (mapM_ killWindow) (spawnHere "goldendict")) --- , ((winKey , xK_d), ifWindows (className =? "Xfce4-dict") (mapM_ killWindow) (spawnHere "xfce4-dict")) +-- , ((winKey , xK_d ), ifWindows (className =? "Goldendict") (mapM_ killWindow) (spawnHere "goldendict")) + , ((winKey , xK_d), ifWindows (className =? "Xfce4-dict") (mapM_ killWindow) (spawnHere "xfce4-dict")) -- , ((winKey , xK_d), ifWindows (className =? "Gnome-dictionary") (mapM_ killWindow) (spawnHere "gnome-dictionary")) , ((winKey , xK_f), spawnHere (myTerminal ++ " -e vifm . ~")) --, ((winKey , xK_f), spawnHere ("export SHELL=/bin/bash && " ++ myTerminal ++ " -e mc"))