From 7e6fc4bd1427dfcfb849c9e23a64bff57b19baba Mon Sep 17 00:00:00 2001
From: Josh Rahm <joshuarahm@gmail.com>
Date: Tue, 12 Apr 2022 01:04:05 -0600
Subject: Break out the ModifyDescription into its own file.

---
 src/Rahm/Desktop/Keys.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src/Rahm/Desktop/Keys.hs')

diff --git a/src/Rahm/Desktop/Keys.hs b/src/Rahm/Desktop/Keys.hs
index b8a4c4e..c8d9092 100644
--- a/src/Rahm/Desktop/Keys.hs
+++ b/src/Rahm/Desktop/Keys.hs
@@ -56,6 +56,7 @@ import Rahm.Desktop.RebindKeys
 import Rahm.Desktop.Swallow
 import Rahm.Desktop.Layout.Pop (PopMessage(..))
 import Rahm.Desktop.Layout.Flip (flipHorizontally, flipVertically)
+import Rahm.Desktop.Layout.Rotate (rotateLayout)
 import Rahm.Desktop.ScreenRotate (screenRotateForward, screenRotateBackward)
 
 type KeyMap l = XConfig l -> Map (KeyMask, KeySym) (X ())
@@ -398,7 +399,7 @@ keymap = runKeys $ do
     justMod $ doc "Run a command via Rofi" runDMenu
     shiftMod $
       doc "Rotate the current layout. (flips x, y coordinates)" $
-      sendMessage DoRotate
+      sendMessage rotateLayout
 
   bind xK_s $ do
     altMod $ spawnX "sudo -A systemctl suspend && xsecurelock"
-- 
cgit