Commit e081b081 authored by Andrey Mokhov's avatar Andrey Mokhov
Browse files

Fix paths in inplace-pkg-config files

parent 6552aff7
......@@ -47,10 +47,8 @@ buildPackageData context@Context {..} = do
. replace "rts/dist/build" rtsBuildPath
. replace "includes/dist-derivedconstants/header" generatedPath )
. lines
else do
top <- topDirectory
let oldPath = top -/- path </> "build"
fixFile conf $ unlines . map (replace oldPath path) . lines
else
fixFile conf $ unlines . map (replace (path </> "build") path) . lines
priority 2.0 $ when (nonCabalContext context) $ dataFile %>
generatePackageData context
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment