Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- import XMonad
- import Data.Map (fromList)
- import Data.Monoid (mappend)
- import qualified XMonad.StackSet as W
- import XMonad.Hooks.ManageHelpers
- main = do
- xmonad $ defaultConfig
- { terminal = "xterm"
- , modMask = mod4Mask
- , borderWidth = 0
- , keys = keys defaultConfig `mappend`
- \c -> fromList [
- ((0, xK_F1), spawn "dmenu_run"),
- ((0, 0x1008ff11), spawn "amixer set -q Master 5%-"),
- ((0, 0x1008ff13), spawn "amixer set -q Master 5%+"),
- ((0, 0x1008ff2a), spawn "sudo /usr/sbin/pm-suspend")
- ]
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement