aboutsummaryrefslogtreecommitdiff
path: root/src/Rahm/Desktop/Common.hs
diff options
context:
space:
mode:
authorJosh Rahm <rahm@google.com>2022-04-22 18:03:27 -0600
committerJosh Rahm <rahm@google.com>2022-04-22 18:03:27 -0600
commit32a394483e5d8f571b27a70f9a7156cae1ed6180 (patch)
treef2fab1c1edeb5d7de92e7de1ab5f5b85b91fe057 /src/Rahm/Desktop/Common.hs
parent7dfbd2e4bc893f7527f9cc4ebf9c474ddfb0dc65 (diff)
downloadrde-32a394483e5d8f571b27a70f9a7156cae1ed6180.tar.gz
rde-32a394483e5d8f571b27a70f9a7156cae1ed6180.tar.bz2
rde-32a394483e5d8f571b27a70f9a7156cae1ed6180.zip
Run hlint
Diffstat (limited to 'src/Rahm/Desktop/Common.hs')
-rw-r--r--src/Rahm/Desktop/Common.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Rahm/Desktop/Common.hs b/src/Rahm/Desktop/Common.hs
index 9187edf..6d86c0e 100644
--- a/src/Rahm/Desktop/Common.hs
+++ b/src/Rahm/Desktop/Common.hs
@@ -75,7 +75,7 @@ askWindowId = do
runDMenuPromptWithMap "Window" (Just "#f542f5") windowTitlesToWinId
windowJump :: X ()
-windowJump = (mapM_ (focus . head)) =<< askWindowId
+windowJump = mapM_ (focus . head) =<< askWindowId
-- Temporarily set the border color of the given windows.
withBorderColor :: String -> [Window] -> X a -> X a