diff options
| author | Daniel Gröber <dxld@darkboxed.org> | 2018-10-26 04:18:37 +0200 |
|---|---|---|
| committer | Daniel Gröber <dxld@darkboxed.org> | 2018-10-27 20:48:56 +0200 |
| commit | 100a816f725294b13aeb33937d3fd6b49735b7c9 (patch) | |
| tree | bb9b8574a9ce3325e4d68b8ee1f087294d34d5d4 | |
| parent | c747047f0be63af991c0175829220411302e7e62 (diff) | |
Whitespace changes
| -rw-r--r-- | lib/Distribution/Helper.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Distribution/Helper.hs b/lib/Distribution/Helper.hs index 452bb91..fe9ef44 100644 --- a/lib/Distribution/Helper.hs +++ b/lib/Distribution/Helper.hs @@ -312,7 +312,7 @@ discardInactiveUnitInfos -> Map DistDirLib UnitInfo -> Map DistDirLib UnitInfo discardInactiveUnitInfos active_units uis0 = - restrictKeysMap uis0 $ Set.fromList $ map uDistDir active_units + restrictKeysMap uis0 $ Set.fromList $ map uDistDir active_units where restrictKeysMap :: Ord k => Map k a -> Set k -> Map k a restrictKeysMap m s = Map.filterWithKey (\k _ -> Set.member k s) m @@ -549,7 +549,7 @@ getSandboxPkgDb -- @cabal.sandbox.config@ file -> IO (Maybe FilePath) getSandboxPkgDb buildPlat ghc_ver projdir = - CabalHelper.Shared.Sandbox.getSandboxPkgDb buildPlat ghc_ver projdir + CabalHelper.Shared.Sandbox.getSandboxPkgDb buildPlat ghc_ver projdir buildPlatform :: String buildPlatform = display Distribution.System.buildPlatform |