Skip to content

Instantly share code, notes, and snippets.

@pimeys
Created October 21, 2012 08:50
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
Star You must be signed in to star a gist
Save pimeys/3926401 to your computer and use it in GitHub Desktop.
Xmonad configuration, my try
import XMonad
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/pimeys/.xmobarrc"
xmonad $ defaultConfig
{ manageHook = manageDocks
<+> manageHook defaultConfig
, layoutHook = avoidStruts $ layoutHook defaultConfig
, terminal = "urxvt +sb -vb"
, logHook = dynamicLogWithPP xmobarPP
{ ppOutput = hPutStrLn xmproc
, ppTitle = xmobarColor "green" "" . shorten 50
}
, modMask = mod4Mask
} `additionalKeys`
[
((mod4Mask .|. shiftMask, xK_z), spawn "xscreensaver-command -lock") -- meta shift z
, ((mod4Mask .|. shiftMask, xK_a), spawn "gvim ~/code/ruby") -- meta shift z
, ((controlMask, xK_Print), spawn "sleep 0.2; scrot -s") -- print --> screenshot
, ((mod4Mask, xK_i), spawn "amixer -c 1 sset Master 0")
, ((mod4Mask, xK_u), spawn "amixer -c 1 sset Master 1dB-")
, ((mod4Mask, xK_o), spawn "amixer -c 1 sset Master 1dB")
, ((mod4Mask, xK_p), spawn "/usr/bin/dmenu_run")
]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment