diff options
Diffstat (limited to 'app/Main.hs')
| -rw-r--r-- | app/Main.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/app/Main.hs b/app/Main.hs index c37fb89..35bff7d 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -27,7 +27,7 @@ import Text.Read (readMaybe) import Xmobar import Paths_xmobar (version) -import Configuration (readConfig, readDefaultConfig) +import Configuration as C (readConfig, readDefaultConfig) -- $main @@ -36,8 +36,8 @@ main :: IO () main = do (o,file) <- getArgs >>= getOpts (c,defaultings) <- case file of - [cfgfile] -> readConfig cfgfile usage - _ -> readDefaultConfig usage + [cfgfile] -> C.readConfig cfgfile usage + _ -> C.readDefaultConfig usage unless (null defaultings) $ putStrLn $ "Fields missing from config defaulted: " ++ intercalate "," defaultings doOpts c o >>= xmobar |