summaryrefslogtreecommitdiffhomepage
path: root/app/Main.hs
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2018-11-26 14:20:58 +0000
committerjao <jao@gnu.org>2018-11-26 14:20:58 +0000
commit93f3ad6e5d700ac8419bf0c97412ee23b44e8cc3 (patch)
treee618fc986126d619a2cb75b4c5e47313e7ad4c08 /app/Main.hs
parentc4b451322c10fd3a0630416a5ba2acb2240236e9 (diff)
downloadxmobar-93f3ad6e5d700ac8419bf0c97412ee23b44e8cc3.tar.gz
xmobar-93f3ad6e5d700ac8419bf0c97412ee23b44e8cc3.tar.bz2
Linting
Diffstat (limited to 'app/Main.hs')
-rw-r--r--app/Main.hs2
1 files changed, 1 insertions, 1 deletions
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