diff --git a/Language/Haskell/GhcMod/CabalHelper.hs b/Language/Haskell/GhcMod/CabalHelper.hs index b53f5a5..57f133d 100644 --- a/Language/Haskell/GhcMod/CabalHelper.hs +++ b/Language/Haskell/GhcMod/CabalHelper.hs @@ -77,7 +77,7 @@ getPackageDbStack' = chCached Cached { cacheFile = pkgDbStackCacheFile, cachedAction = \ _tcf (progs, rootdir, distdir, _) _ma -> do dbs <- withCabal $ map chPkgToGhcPkg <$> runQuery' progs rootdir distdir packageDbStack - return ([setupConfigPath, sandboConfigFile], dbs) + return ([setupConfigPath, sandboxConfigFile], dbs) } chPkgToGhcPkg :: ChPkgDb -> GhcPkgDb diff --git a/Language/Haskell/GhcMod/PathsAndFiles.hs b/Language/Haskell/GhcMod/PathsAndFiles.hs index 527eb21..c344c8f 100644 --- a/Language/Haskell/GhcMod/PathsAndFiles.hs +++ b/Language/Haskell/GhcMod/PathsAndFiles.hs @@ -144,7 +144,7 @@ findCabalSandboxDir dir = do _ -> Nothing where - isSandboxConfig = (==sandboConfigFile) + isSandboxConfig = (==sandboxConfigFile) zipMapM :: Monad m => (a -> m c) -> [a] -> m [(a,c)] zipMapM f as = mapM (\a -> liftM ((,) a) $ f a) as @@ -180,8 +180,8 @@ parents dir' = setupConfigFile :: Cradle -> FilePath setupConfigFile crdl = cradleRootDir crdl setupConfigPath -sandboConfigFile :: FilePath -sandboConfigFile = "cabal.sandbox.config" +sandboxConfigFile :: FilePath +sandboxConfigFile = "cabal.sandbox.config" -- | Path to 'LocalBuildInfo' file, usually @dist/setup-config@ setupConfigPath :: FilePath