Mercurial > dotfiles

comparison .xmonad/xmonad.hs @ 271:79a64ef88a6b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge
author Augie Fackler <durin42@gmail.com>
date Mon, 12 Dec 2011 11:47:34 -0600
parents 93a8f55a4e30
children 64e73453e43f
comparison
equal deleted inserted replaced
270:1e2125a577da 271:79a64ef88a6b
1 import XMonad 1 import XMonad
2 2
3 import XMonad 3 import XMonad
4 import XMonad.Config.Gnome 4 import XMonad.Config.Gnome
5 import XMonad.Hooks.ManageDocks 5 import XMonad.Hooks.ManageDocks
6 import XMonad.Hooks.ICCCMFocus
6 import XMonad.Layout 7 import XMonad.Layout
7 import XMonad.Layout.Column 8 import XMonad.Layout.Column
8 import XMonad.Layout.LayoutBuilder 9 import XMonad.Layout.LayoutBuilder
9 import XMonad.Util.EZConfig 10 import XMonad.Util.EZConfig
10 import XMonad.Util.Run(spawnPipe) 11 import XMonad.Util.Run(spawnPipe)
24 main = do 25 main = do
25 xmonad $ gnomeConfig 26 xmonad $ gnomeConfig
26 { terminal = "urxvt -sr -bg Black -fg White" 27 { terminal = "urxvt -sr -bg Black -fg White"
27 , modMask = mod4Mask 28 , modMask = mod4Mask
28 , layoutHook = avoidStruts myLayout 29 , layoutHook = avoidStruts myLayout
30 , logHook = takeTopFocus
29 } `additionalKeys` [ 31 } `additionalKeys` [
30 ((mod4Mask, xK_a), spawn "gnome-screensaver-command --lock") 32 ((mod4Mask, xK_a), spawn "gnome-screensaver-command --lock")
31 , ((mod4Mask, xK_p), spawn myDmenuTitleBar) 33 , ((mod4Mask, xK_p), spawn myDmenuTitleBar)
32 ] 34 ]