From 93f3ad6e5d700ac8419bf0c97412ee23b44e8cc3 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Mon, 26 Nov 2018 14:20:58 +0000
Subject: Linting

---
 app/Main.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'app')

diff --git a/app/Main.hs b/app/Main.hs
index 51bfe8b..fb1a7ca 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -37,7 +37,7 @@ main = do
   (c,defaultings) <- case file of
                        [cfgfile] -> config cfgfile usage
                        _ -> defConfig usage
-  unless (null defaultings || (not $ any (== Debug) o)) $ putStrLn $
+  unless (null defaultings || notElem Debug o) $ putStrLn $
     "Fields missing from config defaulted: " ++ intercalate "," defaultings
   doOpts c o >>= xmobar
 
-- 
cgit v1.2.3