From 685d67d19d2e94fc94ed7334e5e7ab19454426d7 Mon Sep 17 00:00:00 2001
From: Josh Rahm <joshuarahm@gmail.com>
Date: Mon, 28 Mar 2022 23:27:45 -0600
Subject: Fix things that Hlint is complaining about.

---
 src/Internal/Keys.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/Internal/Keys.hs')

diff --git a/src/Internal/Keys.hs b/src/Internal/Keys.hs
index b322eb4..446b7b7 100644
--- a/src/Internal/Keys.hs
+++ b/src/Internal/Keys.hs
@@ -277,7 +277,7 @@ keymap = runKeys $ do
            recur
 
       bind xK_v $ do
-        justMod $ recur
+        justMod recur
 
   bind xK_w $ do
     justMod windowJump
@@ -494,4 +494,4 @@ modifyWindowBorder i = ModifyWindowBorder $ \(Border a b c d) ->
   Border (clip $ a + i) (clip $ b + i) (clip $ c + i) (clip $ d + i)
 
   where clip i | i < 0 = 0
-        clip i | otherwise = i
+        clip i = i
-- 
cgit