On Fri, 2008-12-12 at 01:01 +0100, Sean Leather wrote:
>
> Call the original haddockHook with the updated flags rather
> than the
> haddock command.
> No change in output.
Ah, sorry I misread the code. This works:
import Distribution.Simple
import Distribution.Simple.LocalBuildInfo (LocalBuildInfo(withPrograms))
import Distribution.Simple.Program (reconfigurePrograms)
import Distribution.Verbosity (normal)
main :: IO ()
main = defaultMainWithHooks simpleUserHooks {
haddockHook = \pkg lbi h f -> do
progs <- reconfigurePrograms normal []
[("haddock",["--optghc=-D__HADDOCK__"])]
(withPrograms lbi)
haddockHook simpleUserHooks pkg lbi { withPrograms = progs } h f
}
_______________________________________________
Haskell-Cafe mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/haskell-cafe
