hasufell/ghc-mod
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Cleanup

Browse Source
This commit is contained in:
Daniel Gröber 2015-08-18 04:50:51 +02:00
parent cdc74e059c
commit f7149ba23f
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
Language/Haskell/GhcMod/Target.hs
View File

@ -318,10 +318,11 @@ sandboxOpts crdl = do
where where
(wdir, rdir) = (cradleCurrentDir crdl, cradleRootDir crdl) (wdir, rdir) = (cradleCurrentDir crdl, cradleRootDir crdl)
getSandboxPackageDbStack :: FilePath getSandboxPackageDbStack
-- ^ Project Directory (where the cabal.sandbox.config :: FilePath
-- file would be if it exists) -- ^ Project Directory (where the cabal.sandbox.config file would be if
-> IO [GhcPkgDb] -- it exists)
-> IO [GhcPkgDb]
getSandboxPackageDbStack cdir = getSandboxPackageDbStack cdir =
([GlobalDb] ++) . maybe [UserDb] return <$> getSandboxDb cdir ([GlobalDb] ++) . maybe [UserDb] return <$> getSandboxDb cdir