Commit 56b5e9bf authored by bjorn@bringert.net's avatar bjorn@bringert.net
Browse files

Use default configuration if we can't parse the config file.

parent dd7c8205
......@@ -194,7 +194,10 @@ loadConfig configFile =
case parseBasicStanza configFieldDescrs conf inp of
ParseOk _ conf' -> return conf'
ParseFailed err ->
fail $ "Error parsing config file " ++ configFile ++ ": " ++ showPError err
do hPutStrLn stderr $ "Error parsing config file "
++ configFile ++ ": " ++ showPError err
hPutStrLn stderr $ "Using default configuration."
return defaultConf
-- FIXME: finish this
writeDefaultConfigFile :: FilePath -> IO ()
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment