Use LBI buildDir instead of hardcoded "dist" </> "build".

This commit is contained in:
Clint Adams 2012-11-07 14:57:17 -05:00
parent 4cd573c61f
commit ff0061281f

View file

@ -34,10 +34,10 @@ main = do
-- | Build man pages from markdown sources in man/
makeManPages :: Args -> BuildFlags -> PackageDescription -> LocalBuildInfo -> IO ()
makeManPages _ flags _ _ = do
makeManPages _ flags _ lbi = do
let verbosity = fromFlag $ buildVerbosity flags
let args = ["--verbose" | verbosity /= silent]
rawSystem ("dist" </> "build" </> "make-pandoc-man-pages" </> "make-pandoc-man-pages")
rawSystem (buildDir lbi </> "make-pandoc-man-pages" </> "make-pandoc-man-pages")
args >>= exitWith
manpages :: [FilePath]