@@ -185,6 +185,14 @@ keys' conf@(XConfig {XMonad.modMask = modMask}) = M.fromList $ , ((modMask .|. controlMask, xK_r ), spawn "mpc volume +4") , ((modMask .|. controlMask, xK_l ), spawn "mpc seek +2%") + -- Alsa keyboard control + -- XF86AudioMute + , ((0 , 0x1008ff12), spawn "amixer -q set PCM toggle") + -- XF86AudioLowerVolume + , ((0 , 0x1008ff11), spawn "amixer -q set PCM 2- unmute") + -- XF86AudioRaiseVolume + , ((0 , 0x1008ff13), spawn "amixer -q set PCM 2+ unmute") + -- quit, or restart , ((modMask .|. shiftMask, xK_q ), io (exitWith ExitSuccess)) , ((modMask , xK_q ), restart "xmonad" True) .xmonad/xmonad.hs 3b7b501f8dd12f79a4312d2035cefb2d7c2d34e1 anderstornvig anderstornvig@gmail.com http://github.com/anderstornvig/config-files/commit/c478113553a8d6d3ec9577d6cdc83cdaa68af358 c478113553a8d6d3ec9577d6cdc83cdaa68af358 2009-05-15T14:47:39-07:00 2009-05-15T14:47:39-07:00 Added ALSA keyboard control 6e7f527e1caa2fb7b443fb09e68cce3026bbc80d anderstornvig anderstornvig@gmail.com