aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--CabalHelper/Main.hs1
-rw-r--r--Distribution/Helper.hs2
2 files changed, 2 insertions, 1 deletions
diff --git a/CabalHelper/Main.hs b/CabalHelper/Main.hs
index c0443e8..0177cf5 100644
--- a/CabalHelper/Main.hs
+++ b/CabalHelper/Main.hs
@@ -159,6 +159,7 @@ main = do
print =<< flip mapM cmds $$ \cmd -> do
case cmd of
"write-autogen-files":[] -> do
+ -- can't use @projdir@ here
let pd = localPkgDescr lbi
-- calls writeAutogenFiles
initialBuildSteps distdir pd lbi v
diff --git a/Distribution/Helper.hs b/Distribution/Helper.hs
index 05f5b3c..956f714 100644
--- a/Distribution/Helper.hs
+++ b/Distribution/Helper.hs
@@ -243,7 +243,7 @@ writeAutogenFiles :: MonadIO m
-> m ()
writeAutogenFiles distdir = liftIO $ do
exe <- findLibexecExe "cabal-helper-wrapper"
- void $ readProcess exe [distdir, "write-autogen-files"] ""
+ void $ readProcess exe ["/nowhere/../..", distdir, "write-autogen-files"] ""
-- | Get the path to the sandbox package-db in a project
getSandboxPkgDb :: FilePath