diff options
| author | Josh Rahm <joshuarahm@gmail.com> | 2022-03-28 23:27:45 -0600 |
|---|---|---|
| committer | Josh Rahm <joshuarahm@gmail.com> | 2022-10-09 12:19:45 -0600 |
| commit | c75c5f8254181242a96f3f6652a53cc70f40b13e (patch) | |
| tree | a4df88d0c9d98d3ba7513bc6c679c80a96c112e0 /src/Internal/Keys.hs | |
| parent | 4b448be1c8c4cc1d973561f94b4527962d09bdd7 (diff) | |
| download | rde-c75c5f8254181242a96f3f6652a53cc70f40b13e.tar.gz rde-c75c5f8254181242a96f3f6652a53cc70f40b13e.tar.bz2 rde-c75c5f8254181242a96f3f6652a53cc70f40b13e.zip | |
Fix things that Hlint is complaining about.
Diffstat (limited to 'src/Internal/Keys.hs')
| -rw-r--r-- | src/Internal/Keys.hs | 4 |
1 files changed, 2 insertions, 2 deletions
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 |