rcfiles/.xmonad/xmonad.hs

71 lines
3.3 KiB
Haskell
Raw Normal View History

2016-05-29 12:06:32 +00:00
import XMonad
2017-08-29 10:26:56 +00:00
import XMonad.Config.Desktop
2016-05-29 12:06:32 +00:00
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageDocks
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.EZConfig(additionalKeys)
import System.IO
main = do
xmproc <- spawnPipe "/usr/bin/xmobar /home/craige/.xmobarrc"
2018-01-07 20:43:31 +00:00
spawn "/usr/lib/notification-daemon/notification-daemon"
-- Launch xmobar as my task bar.
2017-08-29 10:26:56 +00:00
xmonad $ desktopConfig
{ focusFollowsMouse = False
, terminal = "terminology"
2017-08-29 10:26:56 +00:00
, manageHook = manageDocks <+> manageHook desktopConfig
, layoutHook = avoidStruts $ layoutHook desktopConfig
, logHook = dynamicLogWithPP $ xmobarPP
{ ppOutput = hPutStrLn xmproc
, ppCurrent = xmobarColor "#859900" "" . wrap "[" "]"
, ppVisible = xmobarColor "#2aa198" "" . wrap "(" ")"
, ppLayout = xmobarColor "#2aa198" ""
, ppTitle = xmobarColor "#859900" "" . shorten 50
}
, modMask = mod4Mask -- Rebind Mod to the Windows key
--, borderWidth = 1
} `additionalKeys`
-- Custom dmenu launcher
[ ((mod4Mask, xK_p ), spawn
2017-03-30 04:41:28 +00:00
" exe=`dmenu_path | dmenu -fn \"Open Sans-10\" -p \"λ:\" \
\ -nb \"#073642\" -nf \"#93a1a1\" -sb \"#002b36\" -sf \
\ \"#859900\"` && eval \"exec $exe\""
)
-- Lock the screen
, ((0, 0x1008ff2d), spawn "xscreensaver-command -lock")
-- XF86ScreenSaver
, ((mod4Mask .|. controlMask, xK_l), spawn "xscreensaver-command -lock")
, ((controlMask, xK_Print), spawn "sleep 0.2; scrot -s")
, ((0, xK_Print), spawn "scrot")
-- Turn on the eDP-1 port and set it as the primary display
, ((mod4Mask .|. shiftMask, xK_e), spawn
" /usr/bin/xrandr --output eDP-1 --primary --auto --output "
)
-- Turn off the HDMI port
, ((mod4Mask .|. controlMask, xK_h), spawn
"/usr/bin/xrandr --output HDMI-1 --off"
)
-- Turn on the HDMI-1 port and set it as the secondary display
, ((mod4Mask .|. shiftMask, xK_h), spawn
" /usr/bin/xrandr --output eDP-1 --primary --auto --output \
\ HDMI-1 --right-of eDP-1 --auto"
)
, ((0 , 0x1008FF11), spawn
"amixer set Master 2%-") -- XF86AudioLowerVolume
, ((0 , 0x1008FF12), spawn
"amixer set Master toggle") -- XF86AudioMute
, ((0 , 0x1008FF13), spawn
"amixer set Master 2%+") -- XF86AudioRaiseVolume
, ((0 , 0x1008FF14), spawn "mpc toggle") -- Play/pause
2018-03-20 23:28:50 +00:00
, ((mod4Mask .|. controlMask, xK_space), spawn "mpc toggle") -- Play/pause
, ((0 , 0x1008FF15), spawn "mpc stop") -- Stop
, ((0 , 0x1008FF16), spawn "mpc prev") -- XF86AudioPrevious
2018-03-20 23:28:50 +00:00
, ((mod4Mask , xK_h), spawn "mpc prev") -- prev
, ((0 , 0x1008FF17), spawn "mpc next") -- XF86AudioNext
2018-03-20 23:28:50 +00:00
, ((mod4Mask , xK_l), spawn "mpc next") -- Next
-- XF86MonBrightnessUp
, ((0 , 0x1008ff02), spawn "brightnessctl s +5%")
-- XF86MonBrightnessDown
, ((0 , 0x1008ff03), spawn "brightnessctl s 5%-")
]