diff --git a/CHANGELOG b/CHANGELOG index 769be5a892..571bb5f440 100644 --- a/CHANGELOG +++ b/CHANGELOG @@ -37,6 +37,7 @@ git-annex (8.20200909) UNRELEASED; urgency=medium encryption= in their config. * Parse youtube-dl progress output, which lets progress be displayed when doing concurrent downloads. + * Fix build with Benchmark build flag. -- Joey Hess Mon, 14 Sep 2020 18:34:37 -0400 diff --git a/Database/Benchmark.hs b/Database/Benchmark.hs index 6683b8446e..d287b42dd7 100644 --- a/Database/Benchmark.hs +++ b/Database/Benchmark.hs @@ -92,7 +92,7 @@ keyN n = mkKey $ \k -> k } fileN :: Integer -> TopFilePath -fileN n = asTopFilePath ("file" ++ show n) +fileN n = asTopFilePath (toRawFilePath ("file" ++ show n)) keyMiss :: Key keyMiss = keyN 0 -- 0 is never stored