Consistent projectParse ... source

haskell · Dec 17, 2024 · db907f0 · db907f0
1 parent a468360
commit db907f0
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/cabal-install/src/Distribution/Client/ProjectConfig/Legacy.hs b/cabal-install/src/Distribution/Client/ProjectConfig/Legacy.hs
@@ -288,7 +288,7 @@ parseProjectSkeleton cacheDir httpTransport verbosity projectDir source (Project
             let fs = (\z -> CondNode z [normLocPath] mempty) <$> fieldsToConfig normSource (reverse acc)
             res <- parseProjectSkeleton cacheDir httpTransport verbosity projectDir importLocPath . ProjectConfigToParse =<< fetchImportConfig normLocPath
             rest <- go [] xs
-            pure . fmap mconcat . sequence $ [projectParse Nothing normSource fs, res, rest]
+            pure . fmap mconcat . sequence $ [projectParse Nothing source fs, res, rest]
       (ParseUtils.Section l "if" p xs') -> do
         subpcs <- go [] xs'
         let fs = singletonProjectConfigSkeleton <$> fieldsToConfig source (reverse acc)