[XMonad] Add binding to go to hangouts

This commit is contained in:
Ivan Malison 2016-12-24 19:39:58 -08:00
parent e0c7bd63d7
commit 948a0f713c
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8

View File

@ -612,6 +612,8 @@ addKeys conf@XConfig {modMask = modm} =
[ ((modalt, xK_m), doScratchpad "htop") [ ((modalt, xK_m), doScratchpad "htop")
, ((modalt, xK_v), doScratchpad "volume") , ((modalt, xK_v), doScratchpad "volume")
, ((modalt, xK_h), doScratchpad "hangouts") , ((modalt, xK_h), doScratchpad "hangouts")
, ((modalt .|. controlMask, xK_h),
myRaiseNextMaybe (spawn hangoutsCommand) hangoutsSelector)
-- Specific program spawning -- Specific program spawning