@@ -27,7 +27,7 @@ import Data.Time.Clock (UTCTime(..))
2727main :: IO ()
2828main = do
2929 defaultMainWithHooks $ simpleUserHooks {
30− postBuild = makeManPages
30+ postBuild = makeManPages
3131 , postCopy = \ _ flags pkg lbi ->
3232 installManpages pkg lbi (fromFlag $ copyVerbosity flags)
3333 (fromFlag $ copyDest flags)
@@ -48,7 +48,7 @@ makeManPages _ flags _ lbi = do
4848 packageDB =
4949 withPackageDB lbi
5050 ++ [SpecificPackageDB $ distPref </> "package.conf.inplace"]
51−
51+
5252 verbosity = fromFlag $ buildVerbosity flags
5353
5454 args = makeGhcArgs (ghcPackageDbOptions packageDB)