[XMonad] Minor cleanup

2016-10-13 13:28:44 -07:00 · 2016-10-13 13:28:44 -07:00 · a1301bf629
commit a1301bf629
parent 0a3ee6ecc4
1 changed files with 1 additions and 2 deletions
--- a/dotfiles/xmonad/xmonad.hs
+++ b/dotfiles/xmonad/xmonad.hs
@ -27,10 +27,9 @@ main = xmonad $ ewmh $ pagerHints def
       , logHook = myLogHook
       , handleEventHook = docksEventHook <+> fullscreenEventHook
       , startupHook = myStartup
-       , keys = customKeys (\x -> []) addKeys
+       , keys = customKeys (const []) addKeys
       }

-myLogHook :: X()
 myLogHook = fadeInactiveLogHook 0.9

 shiftThenView i = W.greedyView i . W.shift i