From: Joey Hess Date: Tue, 15 Oct 2024 17:30:52 +0000 (-0400) Subject: remove change that was accidentially committed X-Git-Tag: archive/raspbian/10.20250416-2+rpi1~1^2~17^2~36^2~29 X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=9e8bbb3aacbe81a631ef989a36d64c84167aa3de;p=git-annex.git remove change that was accidentially committed --- diff --git a/Remote/Directory.hs b/Remote/Directory.hs index 868dc43611..cebd5e61fe 100644 --- a/Remote/Directory.hs +++ b/Remote/Directory.hs @@ -252,9 +252,9 @@ finalizeStoreGeneric d tmp dest = do retrieveKeyFileM :: RawFilePath -> ChunkConfig -> CopyCoWTried -> Retriever retrieveKeyFileM d (LegacyChunks _) _ = Legacy.retrieve locations' d ---retrieveKeyFileM d NoChunks cow = fileRetriever' $ \dest k p iv -> do --- src <- liftIO $ fromRawFilePath <$> getLocation d k --- void $ liftIO $ fileCopier cow src (fromRawFilePath dest) p iv +retrieveKeyFileM d NoChunks cow = fileRetriever' $ \dest k p iv -> do + src <- liftIO $ fromRawFilePath <$> getLocation d k + void $ liftIO $ fileCopier cow src (fromRawFilePath dest) p iv retrieveKeyFileM d _ _ = byteRetriever $ \k sink -> sink =<< liftIO (L.readFile . fromRawFilePath =<< getLocation d k)