Skip to content

Instantly share code, notes, and snippets.

Created October 18, 2012 02:44
What would you like to do?
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/draiken/.xmobarrc"
xmonad $ defaultConfig
{ manageHook = manageDocks <+> manageHook defaultConfig
, layoutHook = avoidStruts $ layoutHook defaultConfig
} `additionalKeys`
[ ((mod4Mask .|. shiftMask, xK_z), spawn "gnome-screensaver-command --lock") --mod4mask is the windows key
, ((0, xK_Print), spawn "gnome-screenshot")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment