Commit 5d50f716 authored by Grégoire Locqueville's avatar Grégoire Locqueville

Don't exclude default language from configuration parsing

For some reason the default language (namely EN) was ignored when reading
the configuration file. After discussion with anoe, it appears that
this exclusion happens for historical reasons, so this commit removes it.
parent f406450a
......@@ -47,7 +47,7 @@ readConfig fp = do
let m_nlp_default = parseURI $ cs $ val' lang_default_text
let m_nlp_keys = filter (\k -> k `notElem` [lang_default_text]) $ fromRight [] $ Ini.keys iniSection ini
let m_nlp_keys = fromRight [] $ Ini.keys iniSection ini
let m_nlp_other = listToMaybeAll $ (\k -> (,) k <$> (parseURI $ cs $ val' k)) <$> m_nlp_keys
let mRet = NLPConfig <$> m_nlp_default <*> (Map.fromList <$> m_nlp_other)
......
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