File tree 1 file changed +3
-6
lines changed
1 file changed +3
-6
lines changed Original file line number Diff line number Diff line change @@ -159,12 +159,9 @@ cfgReadProject scope = do
159
159
(configFilePath, yamlConfig) <- cfgRead scope
160
160
let parser = parseProjectAndConfigMonoid (parent configFilePath)
161
161
case Yaml. parseEither parser yamlConfig of
162
- Left err -> do
163
- logError . display $ T. pack err
164
- return Nothing
165
- Right (WithJSONWarnings res _warnings) -> do
166
- ProjectAndConfigMonoid project _ <- liftIO res
167
- return $ Just project
162
+ Left err -> logError (display $ T. pack err) >> return Nothing
163
+ Right (WithJSONWarnings res _warnings) -> liftIO res >>=
164
+ \ (ProjectAndConfigMonoid project _) -> return $ Just project
168
165
169
166
cfgCmdDumpProject :: (HasConfig env , HasLogFunc env ) => ConfigCmdDumpProject -> RIO env ()
170
167
cfgCmdDumpProject (ConfigCmdDumpProject dumpFormat) = do
You can’t perform that action at this time.
0 commit comments