diff options
Diffstat (limited to 'Data/ConfigManager')
| -rw-r--r-- | Data/ConfigManager/Reader.hs | 4 |
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 -> |