diff options
| author | jao <jao@gnu.org> | 2018-11-26 14:20:58 +0000 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2018-11-26 14:20:58 +0000 |
| commit | 93f3ad6e5d700ac8419bf0c97412ee23b44e8cc3 (patch) | |
| tree | e618fc986126d619a2cb75b4c5e47313e7ad4c08 /app/Main.hs | |
| parent | c4b451322c10fd3a0630416a5ba2acb2240236e9 (diff) | |
| download | xmobar-93f3ad6e5d700ac8419bf0c97412ee23b44e8cc3.tar.gz xmobar-93f3ad6e5d700ac8419bf0c97412ee23b44e8cc3.tar.bz2 | |
Linting
Diffstat (limited to 'app/Main.hs')
| -rw-r--r-- | app/Main.hs | 2 |
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 |