Skip to content
Snippets Groups Projects
Unverified Commit e98f6c26 authored by Mikhail Glushenkov's avatar Mikhail Glushenkov
Browse files

Whitespace. [ci skip]

parent 678e43e4
No related branches found
No related tags found
No related merge requests found
......@@ -444,7 +444,7 @@ renderBadProjectRoot :: BadProjectRoot -> String
renderBadProjectRoot (BadProjectRootExplicitFile projectFile) =
"The given project file '" ++ projectFile ++ "' does not exist."
withProjectOrGlobalConfig :: Verbosity
withProjectOrGlobalConfig :: Verbosity
-> Flag FilePath
-> IO a
-> (ProjectConfig -> IO a)
......@@ -455,9 +455,9 @@ withProjectOrGlobalConfig verbosity globalConfigFlag with without = do
let
res' = catch with
$ \case
(BadPackageLocations prov locs)
(BadPackageLocations prov locs)
| prov == Set.singleton Implicit
, let
, let
isGlobErr (BadLocGlobEmptyMatch _) = True
isGlobErr _ = False
, any isGlobErr locs ->
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment