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