From 21ab496f6bf24f545db1df99bc8b04deb6f8f94d Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 16 Nov 2020 09:56:03 -0400 Subject: [PATCH] fix build --- Build/DistributionUpdate.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Build/DistributionUpdate.hs b/Build/DistributionUpdate.hs index e8b219c28e..d63cb6d162 100644 --- a/Build/DistributionUpdate.hs +++ b/Build/DistributionUpdate.hs @@ -65,7 +65,7 @@ main = do topdir <- getCurrentDirectory changeWorkingDirectory repodir updated <- catMaybes <$> mapM (getbuild repodir) autobuilds - state <- Annex.new =<< Git.Construct.fromPath "." + state <- Annex.new =<< Git.Construct.fromPath (toRawFilePath ".") ood <- Annex.eval state $ do buildrpms topdir updated makeinfos updated version @@ -84,7 +84,7 @@ getbuild repodir (url, f) = do let dest = repodir f let tmp = dest ++ ".tmp" removeWhenExistsWith removeFile tmp - createDirectoryIfMissing True (parentDir dest) + createDirectoryIfMissing True (fromRawFilePath (parentDir (toRawFilePath dest))) let oops s = do removeWhenExistsWith removeFile tmp putStrLn $ "*** " ++ s -- 2.39.5