Compare commits
9 Commits
bottom_doc
...
multiscree
| Author | SHA1 | Date | |
|---|---|---|---|
| 5e8eaceae6 | |||
| 4d9a57c448 | |||
| b45529e715 | |||
| ea170669e1 | |||
| 23eac2f9a5 | |||
| 79e6cf4b49 | |||
| 52a0702c7e | |||
| 9e7f09824d | |||
| 4d19799b99 |
47
xmonad.hs
47
xmonad.hs
@ -5,6 +5,7 @@ import XMonad.Config.Desktop
|
||||
-- Actions
|
||||
import XMonad.Actions.CycleWS
|
||||
import XMonad.Actions.DynamicWorkspaces as DW
|
||||
import XMonad.Actions.GridSelect
|
||||
import XMonad.Actions.OnScreen
|
||||
import XMonad.Actions.SpawnOn
|
||||
import XMonad.Actions.UpdatePointer
|
||||
@ -112,23 +113,23 @@ toggleHomeScreens = do
|
||||
\echo -n ' '; \n\
|
||||
\date '+%a, %b %d %T'; \n\
|
||||
\sleep 1; \n\
|
||||
\done | dzen2 -dock -p -x 1680 -w 255 -h 24 -ta l -fg #aaaaaa -bg #000000 -fn 'xos4 Terminus:style=Regular:Pixelsize=12' &"
|
||||
\done | dzen2 -dock -p -x 1602 -w 325 -h 24 -ta l -fg #aaaaaa -bg #000000 -fn 'xos4 Terminus:style=Regular:Pixelsize=12' &"
|
||||
spawn "while true; do \n\
|
||||
\~/bin/battery; \n\
|
||||
\echo -n ' '; \n\
|
||||
\echo -n $(cat /tmp/temp); \n\
|
||||
\~/bin/temp.sh; \n\
|
||||
\echo -n ' '; \n\
|
||||
\date '+%a, %b %d %T'; \n\
|
||||
\sleep 1; \n\
|
||||
\done | dzen2 -dock -p -x 3600 -w 255 -h 24 -ta l -fg #aaaaaa -bg #000000 -fn 'xos4 Terminus:style=Regular:Pixelsize=12' &"
|
||||
\done | dzen2 -dock -p -x 3522 -w 325 -h 24 -ta l -fg #aaaaaa -bg #000000 -fn 'xos4 Terminus:style=Regular:Pixelsize=12' &"
|
||||
spawn "while true; do \n\
|
||||
\~/bin/battery; \n\
|
||||
\echo -n ' '; \n\
|
||||
\echo -n $(cat /tmp/temp); \n\
|
||||
\~/bin/temp.sh; \n\
|
||||
\echo -n ' '; \n\
|
||||
\date '+%a, %b %d %T'; \n\
|
||||
\sleep 1; \n\
|
||||
\done | dzen2 -dock -p -x 5520 -w 255 -h 24 -ta l -fg #aaaaaa -bg #000000 -fn 'xos4 Terminus:style=Regular:Pixelsize=12' &"
|
||||
\done | dzen2 -dock -p -x 5442 -w 325 -h 24 -ta l -fg #aaaaaa -bg #000000 -fn 'xos4 Terminus:style=Regular:Pixelsize=12' &"
|
||||
{- spawn "while true; do echo -n $(cat /tmp/temp); echo -n ' '; date '+%a, %b %d %T'; sleep 1; done | dzen2 -dock -p -x 1710 -w 210 -e 'onstart:lower;button2=togglehide' -h 24 -ta l -fg #aaaaaa -bg #000000 -fn Terminus-10 -xs 1 &"
|
||||
spawn "while true; do echo -n $(cat /tmp/temp); echo -n ' '; date '+%a, %b %d %T'; sleep 1; done | dzen2 -dock -p -x 3630 -w 210 -e 'onstart:lower;button2=togglehide' -h 24 -ta l -fg #aaaaaa -bg #000000 -fn Terminus-10 -xs 0 &"
|
||||
spawn "while true; do echo -n $(cat /tmp/temp); echo -n ' '; date '+%a, %b %d %T'; sleep 1; done | dzen2 -dock -p -x 5550 -w 210 -e 'onstart:lower;button2=togglehide' -h 24 -ta r -fg #aaaaaa -bg #000000 -fn Terminus-10 -xs 2 &" -}
|
||||
@ -220,7 +221,7 @@ myTheme :: Theme
|
||||
myTheme = defaultTheme {
|
||||
fontName = myFont
|
||||
}
|
||||
myFont = "xos4 Terminus:style=Regular:Pixelsize=12"
|
||||
myFont = "xft:xos4 Terminus:style=Regular:Pixelsize=12"
|
||||
|
||||
fadeHook = fadeInactiveLogHook fadeAmount
|
||||
where fadeAmount = 0.8
|
||||
@ -235,16 +236,13 @@ launcher = makeLauncher "-x" "eval" "\"exec " "\""
|
||||
main = do
|
||||
dzenCenterBar <- spawnPipe centerBar
|
||||
dzenBottomBar <- spawnPipe bottomBar
|
||||
-- dzenLeftBar <- spawnPipe leftBar
|
||||
-- dzenRightBar <- spawnPipe rightBar
|
||||
xmonad $ docks $ ewmh $ desktopConfig {
|
||||
workspaces = ["shell","spideroak","vivaldi","pindrop","kofc","bitcoin"]
|
||||
workspaces = ["shell","vivaldi","pindrop","kofc","VM"]
|
||||
, terminal = myTerminal
|
||||
, focusFollowsMouse = True
|
||||
, manageHook = manageDocks <+> myManageHook <+> manageHook desktopConfig
|
||||
, handleEventHook = docksEventHook <+> handleEventHook desktopConfig
|
||||
, layoutHook = avoidStruts $ layoutH
|
||||
--, logHook = myLogHook dzenCenterBar >> myLogHook dzenLeftBar >> myLogHook dzenRightBar >> fadeHook >> updatePointer (0.5, 0.5) (0, 0)
|
||||
, logHook = myLogHook dzenCenterBar >> fadeHook >> updatePointer (0.5, 0.5) (0, 0)
|
||||
, borderWidth = 1
|
||||
, normalBorderColor = "#333333"
|
||||
@ -256,17 +254,18 @@ main = do
|
||||
|
||||
myStartup :: X ()
|
||||
myStartup = do
|
||||
setWMName "LG3D"
|
||||
--setWMName "LG3D"
|
||||
toggleHomeScreens
|
||||
spawn "trayer --edge top --align right --widthtype request --margin 318 --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 318 --expand false --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 -i /home/trey/images/black.png'"
|
||||
--spawn "xautolock -secure -time 10 -locker 'i3lock -c 000000 -i /home/trey/images/black.png'"
|
||||
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 2060 -ta l -w 1024 -e 'onstart:lower;button2=togglehide;sigusr1=togglehide'"
|
||||
bottomBar = "conky | dzen2 -dock -p -y 1080 -ta l -w 1920 -e 'sigusr1=togglehide'"
|
||||
centerBar = "dzen2 -dock -p -x 1920 -ta l -w 1024 -e 'onstart:lower;button2=togglehide;sigusr1=togglehide'"
|
||||
bottomBar = "conky | dzen2 -dock -p -x 1920 -y 1080 -ta l -w 1920 -e 'sigusr1=togglehide'"
|
||||
|
||||
-- rightBar = "dzen2 -w 3840 -h 24 -ta r -fg #555753 -bg #000000 -fn Terminus-10 -xs 2"
|
||||
|
||||
@ -358,12 +357,13 @@ myKeys = [
|
||||
, ((controlMask .|. shiftMask, xK_4), unGrab >> spawn "scrot --exec 'mkdir -p ~/Desktop && mv $f ~/Desktop' --select && paplay ~/wav/camera.wav")
|
||||
-- windows (viewOnScreen 1 "ws")
|
||||
-- ifWindows (resource =? "altUrxvt") (mapM_ focus) (spawnHere altTerminal))
|
||||
, ((winKey .|. shiftMask, xK_v), do
|
||||
windows (viewOnScreen 1 "virtualbox")
|
||||
ifWindows (className =? "Gvim") (mapM_ focus) (spawnHere "gvim"))
|
||||
, ((winKey , xK_v), do
|
||||
windows (viewOnScreen 1 "timetracker")
|
||||
ifWindows (title =? "osmium:timetracker") (mapM_ focus) (spawnHere "urxvtc -cd ~/timetracker -e 'tmux attach -t timetracker || tmux -2 new-session -s timetracker'"))
|
||||
, ((lAlt, xK_v), spawn "clipmenu && xdotool key Ctrl+v")
|
||||
--, ((winKey .|. shiftMask, xK_v), do
|
||||
-- windows (viewOnScreen 1 "virtualbox")
|
||||
-- ifWindows (className =? "Gvim") (mapM_ focus) (spawnHere "gvim"))
|
||||
--, ((winKey , xK_v), do
|
||||
-- windows (viewOnScreen 1 "timetracker")
|
||||
-- ifWindows (title =? "osmium:timetracker") (mapM_ focus) (spawnHere "urxvtc -cd ~/timetracker -e 'tmux attach -t timetracker || tmux -2 new-session -s timetracker'"))
|
||||
--, ((lAlt , xK_v), spawnHere "xfce4-popup-clipman")
|
||||
--, ((winKey , xK_x), windowPromptGoto dXPConfig)
|
||||
, ((winKey .|. shiftMask, xK_x), windowPromptBring dXPConfig)
|
||||
@ -373,7 +373,7 @@ myKeys = [
|
||||
spawnHere "pkill -USR1 dzen2"
|
||||
spawnHere "pkill trayer"
|
||||
sendMessage $ ToggleStrut U)
|
||||
--, ((winKey , xK_g), spawnHere "chromium --allow-outdated-plugins --purge-memory-button ")
|
||||
, ((lAlt , xK_g), spawnHere "~/bin/google_selection.sh")
|
||||
--, ((winKey , xK_g), ifWindows (className =? "Google-chrome") (mapM_ focus) (spawnHere "google-chrome"))
|
||||
, ((winKey , xK_g), ifWindows (className =? "Google-chrome") (mapM_ focus) (spawnHere "google-chrome-stable"))
|
||||
--, ((winKey , xK_r), do
|
||||
@ -411,6 +411,7 @@ myKeys = [
|
||||
, ((winKey , xK_k), windows W.focusUp) -- explicitly setting the default
|
||||
, ((winKey .|. controlMask, xK_k), windows W.swapUp) -- explicitly setting the default
|
||||
, ((lAlt , xK_Tab), windows W.focusDown) -- replicating MS Windows task switcher behavior
|
||||
, ((winKey , xK_Tab), goToSelected defaultGSConfig)
|
||||
, ((lAlt .|. shiftMask, xK_Tab), windows W.focusUp) -- replicating MS Windows task switcher behavior
|
||||
, ((winKey .|. controlMask, xK_Return), windows W.swapMaster)
|
||||
, ((winKey, xK_space ), sendMessage NextLayout)
|
||||
@ -544,7 +545,7 @@ myKeys = [
|
||||
[((m .|. winKey, key), screenWorkspace sc >>= flip whenJust (windows . f))
|
||||
-- | (key, sc) <- zip [xK_w, xK_r] [0..]
|
||||
-- | (key, sc) <- zip [xK_Left, xK_Right] [0..] -- For arrow keys
|
||||
| (key, sc) <- zip [xK_e, xK_r, xK_w] [0..] -- For w,r keys
|
||||
| (key, sc) <- zip [xK_e, xK_w, xK_r] [0..] -- For w,r keys
|
||||
-- | (key, sc) <- zip [xK_w, xK_r] [1,0] -- For w,r keys in backwards order
|
||||
-- | (key, sc) <- zip [xK_w, xK_r] [1,0] -- For w,r keys in backwards order
|
||||
, (f, m) <- [(W.view, 0), (W.shift, shiftMask)]]
|
||||
|
||||
Reference in New Issue
Block a user