aboutsummaryrefslogtreecommitdiff
path: root/Data/ConfigManager/Reader.hs
diff options
context:
space:
mode:
authorJoris2016-03-21 10:29:21 +0100
committerJoris2016-03-21 10:30:28 +0100
commit9d1e4362f78ab0a0b1a0007aaa38c6cc94c0a62d (patch)
tree258621fe15270397c0d40ff80ffa307bfcb802ee /Data/ConfigManager/Reader.hs
parent565e67e9492a9dbd9ab5130938a29823f5146bcb (diff)
Add an example
Diffstat (limited to 'Data/ConfigManager/Reader.hs')
-rw-r--r--Data/ConfigManager/Reader.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Data/ConfigManager/Reader.hs b/Data/ConfigManager/Reader.hs
index c2f75a7..d422996 100644
--- a/Data/ConfigManager/Reader.hs
+++ b/Data/ConfigManager/Reader.hs
@@ -43,8 +43,8 @@ go fileDir (Right config) expr =
Binding name value ->
return . Right . Config $ M.insert name value (hashMap config)
Import requirement path -> do
- eitherConfig <- readConfig requirement (fileDir </> path)
- case eitherConfig of
+ configOrError <- readConfig requirement (fileDir </> path)
+ case configOrError of
Left errorMessage ->
return . Left $ errorMessage
Right importedConfig ->