From 948a0f713c101aca6405a74013ca672bda26ad54 Mon Sep 17 00:00:00 2001
From: Ivan Malison <IvanMalison@gmail.com>
Date: Sat, 24 Dec 2016 19:39:58 -0800
Subject: [PATCH] [XMonad] Add binding to go to hangouts

---
 dotfiles/xmonad/xmonad.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/dotfiles/xmonad/xmonad.hs b/dotfiles/xmonad/xmonad.hs
index 0c20b5cb..aa80f0ed 100644
--- a/dotfiles/xmonad/xmonad.hs
+++ b/dotfiles/xmonad/xmonad.hs
@@ -612,6 +612,8 @@ addKeys conf@XConfig {modMask = modm} =
     [ ((modalt, xK_m), doScratchpad "htop")
     , ((modalt, xK_v), doScratchpad "volume")
     , ((modalt, xK_h), doScratchpad "hangouts")
+    , ((modalt .|. controlMask, xK_h),
+       myRaiseNextMaybe (spawn hangoutsCommand) hangoutsSelector)
 
     -- Specific program spawning