From 2fe42aaf5397838d0e8ea79d6cd07a9b2d2c2d6d Mon Sep 17 00:00:00 2001
From: Ivan Malison <IvanMalison@gmail.com>
Date: Fri, 11 Nov 2016 10:47:20 -0800
Subject: [PATCH] [XMonad] Fix up whitespace

---
 dotfiles/xmonad/xmonad.hs | 11 ++++-------
 1 file changed, 4 insertions(+), 7 deletions(-)

diff --git a/dotfiles/xmonad/xmonad.hs b/dotfiles/xmonad/xmonad.hs
index f2e386a8..164709f5 100644
--- a/dotfiles/xmonad/xmonad.hs
+++ b/dotfiles/xmonad/xmonad.hs
@@ -54,7 +54,6 @@ main = xmonad $ def
        , keys = customKeys (const []) addKeys
       } where
     x +++ y = mappend y x
-
 
 -- Selectors
 
@@ -100,10 +99,10 @@ myLayoutHook = avoidStruts . smartSpacing 10 . minimize . boringAuto .
 findM :: (Monad m) => (a -> m (Maybe b)) -> [a] -> m (Maybe b)
 findM f = runMaybeT . msum . map (MaybeT . f)
 
-myWindowBringerConfig = WindowBringerConfig { menuCommand = "rofi"
-                                            , menuArgs = ["-dmenu", "-i"]
-                                            , windowTitler = myDecorateName
-                                            }
+myWindowBringerConfig =
+  WindowBringerConfig { menuCommand = "rofi"
+                      , menuArgs = ["-dmenu","-i"]
+                      , windowTitler = myDecorateName}
 
 classIfMatches window entry = do
   result <- runQuery (fst entry) window
@@ -224,7 +223,6 @@ restoreOrMinimizeOtherClasses = withLastMinimized' $ \mw ->
   case mw of
     Just _ -> restoreAllMinimized
     Nothing -> minimizeOtherClassesInWorkspace
-
 
 -- Window switching
 
@@ -249,7 +247,6 @@ bindBringAndRaise mask sym start query =
 
 bindBringAndRaiseMany :: [(KeyMask, KeySym, X (), Query Bool)] -> [((KeyMask, KeySym), X())]
 bindBringAndRaiseMany = concatMap (\(a, b, c, d) -> bindBringAndRaise a b c d)
-
 
 -- Key bindings