diff options
author | jao <jao@gnu.org> | 2019-01-12 19:05:06 +0000 |
---|---|---|
committer | jao <jao@gnu.org> | 2019-01-12 19:05:06 +0000 |
commit | e2c997b5e2d4589d5a4710049734a0a03048363d (patch) | |
tree | ae1ce70c675af91b249fcba063e569d652172c9f /src/Xmobar/App/Main.hs | |
parent | c05854f93a24ca7bdd0d73a532435f1901b05792 (diff) | |
download | xmobar-e2c997b5e2d4589d5a4710049734a0a03048363d.tar.gz xmobar-e2c997b5e2d4589d5a4710049734a0a03048363d.tar.bz2 |
Honour flags when no config file is available (fixes #375)
Diffstat (limited to 'src/Xmobar/App/Main.hs')
-rw-r--r-- | src/Xmobar/App/Main.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Xmobar/App/Main.hs b/src/Xmobar/App/Main.hs index 6eda49a..e54c846 100644 --- a/src/Xmobar/App/Main.hs +++ b/src/Xmobar/App/Main.hs @@ -1,7 +1,7 @@ ------------------------------------------------------------------------------ -- | -- Module: Xmobar.App.Main --- Copyright: (c) 2018 Jose Antonio Ortega Ruiz +-- Copyright: (c) 2018, 2019 Jose Antonio Ortega Ruiz -- License: BSD3-style (see LICENSE) -- -- Maintainer: jao@gnu.org @@ -99,7 +99,7 @@ xmobarMain = do case cf of Nothing -> case rest of (c:_) -> error $ c ++ ": file not found" - _ -> xmobar defaultConfig + _ -> doOpts defaultConfig flags >>= xmobar Just p -> do r <- readConfig defaultConfig p case r of Left e -> |