aboutsummaryrefslogtreecommitdiff
path: root/src/HaskellCodeExplorer/PackageInfo.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/HaskellCodeExplorer/PackageInfo.hs')
-rw-r--r--src/HaskellCodeExplorer/PackageInfo.hs6
1 files changed, 2 insertions, 4 deletions
diff --git a/src/HaskellCodeExplorer/PackageInfo.hs b/src/HaskellCodeExplorer/PackageInfo.hs
index 2f336f4..295f1cb 100644
--- a/src/HaskellCodeExplorer/PackageInfo.hs
+++ b/src/HaskellCodeExplorer/PackageInfo.hs
@@ -214,7 +214,6 @@ createPackageInfo packageDirectoryPath mbDistDirRelativePath sourceCodePreproces
<> "), indexing the first package by default."
<> "Alternatively, try using absolute path for -p."
return $ head packages
-
units <-
liftIO
$ (filter (\((pkgName, _), _, _) -> pkgName == pPackageName package))
@@ -490,9 +489,8 @@ indexBuildComponent sourceCodePreprocessing currentPackageId componentId deps@(f
Just buildDir ->
Just $ buildDir </> (takeBaseName buildDir ++ "-tmp")
Nothing -> Nothing
- _ <-
- -- initUnits happens here
- setSessionDynFlags $ L.foldl'
+ -- initUnits happens here
+ _ <- setSessionDynFlags $ L.foldl'
gopt_set
(flags' { backend = NCG
, ghcLink = LinkInMemory