Actually use the component root

haskell · Apr 15, 2020 · d5b7fc9 · d5b7fc9
1 parent 92ea21e
commit d5b7fc9
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/HIE/Bios/Environment.hs b/src/HIE/Bios/Environment.hs
@@ -38,7 +38,7 @@ initSession  ComponentOptions {..} = do
     let opts_hash = B.unpack $ encode $ H.finalize $ H.updates H.init (map B.pack componentOptions)
     cache_dir <- liftIO $ getCacheDir opts_hash
     -- Add the user specified options to a fresh GHC session.
-    (df', targets) <- addCmdOpts "" componentOptions df
+    (df', targets) <- addCmdOpts componentRoot componentOptions df
     void $ G.setSessionDynFlags
         (disableOptimisation -- Compile with -O0 as we are not going to produce object files.
         $ setIgnoreInterfacePragmas            -- Ignore any non-essential information in interface files such as unfoldings changing.