From 790a2a939bfa5dfc3f4e69438cdcdf99307fc1c3 Mon Sep 17 00:00:00 2001
From: Ivan Malison <IvanMalison@gmail.com>
Date: Wed, 5 Oct 2016 01:30:30 -0700
Subject: [PATCH] [XMonad] Add swapNextScreen binding

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

diff --git a/dotfiles/xmonad/xmonad.hs b/dotfiles/xmonad/xmonad.hs
index cd6d033c..9a276200 100644
--- a/dotfiles/xmonad/xmonad.hs
+++ b/dotfiles/xmonad/xmonad.hs
@@ -1,6 +1,7 @@
 import System.Taffybar.Hooks.PagerHints (pagerHints)
 
 import XMonad hiding ( (|||) )
+import XMonad.Actions.CycleWS
 import XMonad.Actions.WindowBringer
 import XMonad.Config ()
 import XMonad.Hooks.EwmhDesktops
@@ -40,6 +41,7 @@ addKeys conf@XConfig {modMask = modm} =
     , ((modm .|. controlMask, xK_t), spawn "systemctl --user restart taffybar.service")
     , ((modm, xK_b), bringMenuArgs' "rofi" ["-dmenu"])
     , ((modm, xK_v), spawn "copyq paste")
+    , ((modm, xK_s), swapNextScreen)
     , ((mod3Mask, xK_v), spawn "copyq_rofi.sh")
     , ((modm .|. controlMask, xK_space), sendMessage $ JumpToLayout "Full")
     , ((modm, xK_slash), sendMessage $ Toggle MIRROR)