Skip to content

Commit f9afc3a

Browse files
committed
fixes
1 parent 848b7c3 commit f9afc3a

File tree

3 files changed

+36
-37
lines changed

3 files changed

+36
-37
lines changed

cabal-install/src/Distribution/Client/ProjectPlanning.hs

Lines changed: 33 additions & 33 deletions
Original file line numberDiff line numberDiff line change
@@ -4120,40 +4120,40 @@ setupHsHaddockFlags
41204120
setupHsHaddockFlags
41214121
(ElaboratedConfiguredPackage{..})
41224122
(ElaboratedSharedConfig{..})
4123-
(BuildTimeSettings {buildSettingKeepTempFiles = keepTmpFiles})
4123+
(BuildTimeSettings{buildSettingKeepTempFiles = keepTmpFiles})
41244124
common =
4125-
Cabal.HaddockFlags
4126-
{ haddockCommonFlags = common
4127-
, haddockProgramPaths =
4128-
case lookupProgram haddockProgram pkgConfigCompilerProgs of
4129-
Nothing -> mempty
4130-
Just prg ->
4131-
[
4132-
( programName haddockProgram
4133-
, locationPath (programLocation prg)
4134-
)
4135-
]
4136-
, haddockProgramArgs = mempty -- unused, set at configure time
4137-
, haddockHoogle = toFlag elabHaddockHoogle
4138-
, haddockHtml = toFlag elabHaddockHtml
4139-
, haddockHtmlLocation = maybeToFlag elabHaddockHtmlLocation
4140-
, haddockForHackage = toFlag elabHaddockForHackage
4141-
, haddockForeignLibs = toFlag elabHaddockForeignLibs
4142-
, haddockExecutables = toFlag elabHaddockExecutables
4143-
, haddockTestSuites = toFlag elabHaddockTestSuites
4144-
, haddockBenchmarks = toFlag elabHaddockBenchmarks
4145-
, haddockInternal = toFlag elabHaddockInternal
4146-
, haddockCss = maybeToFlag elabHaddockCss
4147-
, haddockLinkedSource = toFlag elabHaddockLinkedSource
4148-
, haddockQuickJump = toFlag elabHaddockQuickJump
4149-
, haddockHscolourCss = maybeToFlag elabHaddockHscolourCss
4150-
, haddockContents = maybeToFlag elabHaddockContents
4151-
, haddockKeepTempFiles = toFlag keepTmpFiles
4152-
, haddockIndex = maybeToFlag elabHaddockIndex
4153-
, haddockBaseUrl = maybeToFlag elabHaddockBaseUrl
4154-
, haddockLib = maybeToFlag elabHaddockLib
4155-
, haddockOutputDir = maybeToFlag elabHaddockOutputDir
4156-
}
4125+
Cabal.HaddockFlags
4126+
{ haddockCommonFlags = common
4127+
, haddockProgramPaths =
4128+
case lookupProgram haddockProgram pkgConfigCompilerProgs of
4129+
Nothing -> mempty
4130+
Just prg ->
4131+
[
4132+
( programName haddockProgram
4133+
, locationPath (programLocation prg)
4134+
)
4135+
]
4136+
, haddockProgramArgs = mempty -- unused, set at configure time
4137+
, haddockHoogle = toFlag elabHaddockHoogle
4138+
, haddockHtml = toFlag elabHaddockHtml
4139+
, haddockHtmlLocation = maybeToFlag elabHaddockHtmlLocation
4140+
, haddockForHackage = toFlag elabHaddockForHackage
4141+
, haddockForeignLibs = toFlag elabHaddockForeignLibs
4142+
, haddockExecutables = toFlag elabHaddockExecutables
4143+
, haddockTestSuites = toFlag elabHaddockTestSuites
4144+
, haddockBenchmarks = toFlag elabHaddockBenchmarks
4145+
, haddockInternal = toFlag elabHaddockInternal
4146+
, haddockCss = maybeToFlag elabHaddockCss
4147+
, haddockLinkedSource = toFlag elabHaddockLinkedSource
4148+
, haddockQuickJump = toFlag elabHaddockQuickJump
4149+
, haddockHscolourCss = maybeToFlag elabHaddockHscolourCss
4150+
, haddockContents = maybeToFlag elabHaddockContents
4151+
, haddockKeepTempFiles = toFlag keepTmpFiles
4152+
, haddockIndex = maybeToFlag elabHaddockIndex
4153+
, haddockBaseUrl = maybeToFlag elabHaddockBaseUrl
4154+
, haddockLib = maybeToFlag elabHaddockLib
4155+
, haddockOutputDir = maybeToFlag elabHaddockOutputDir
4156+
}
41574157

41584158
setupHsHaddockArgs :: ElaboratedConfiguredPackage -> [String]
41594159
-- TODO: Does the issue #3335 affects test as well

cabal-install/src/Distribution/Client/SourceFiles.hs

Lines changed: 2 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -82,9 +82,8 @@ needComponent pkg_descr comp =
8282

8383
needSetup :: Rebuild ()
8484
needSetup = do
85-
findFirstFileMonitored id ["Setup.hs", "Setup.lhs"]
86-
findFirstFileMonitored id ["SetupHooks.hs", "SetupHooks.lhs"]
87-
return ()
85+
void $ findFirstFileMonitored id ["Setup.hs", "Setup.lhs"]
86+
void $ findFirstFileMonitored id ["SetupHooks.hs", "SetupHooks.lhs"]
8887

8988
needLibrary :: PackageDescription -> Library -> Rebuild ()
9089
needLibrary
Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,3 @@
11
packages:
22
bt,
3-
pbts
3+
pbts

0 commit comments

Comments
 (0)