diff options
| author |  Joey Hess <joey@kitenet.net> | 2014-07-24 16:42:35 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-07-24 16:42:35 -0400 |
| commit | 477243a87dd07ac8282745c482708205c5fa474f (patch) | |
| tree | 8b3155b20a916755a0ff91b1037d067a3dfa174b /Remote/Directory.hs | |
| parent | 2b414feaf2d20452794d0cdd608c6dd91feb1ec1 (diff) | |
move meteredWriteFileChunks out of legacy
Diffstat (limited to 'Remote/Directory.hs')
| -rw-r--r-- | Remote/Directory.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Remote/Directory.hs b/Remote/Directory.hs index 82d38c884..62c01e370 100644 --- a/Remote/Directory.hs +++ b/Remote/Directory.hs @@ -222,7 +222,7 @@ retrieve :: FilePath -> ChunkConfig -> Key -> AssociatedFile -> FilePath -> Mete retrieve d chunkconfig k _ f p = metered (Just p) k $ \meterupdate -> liftIO $ withStoredFiles chunkconfig d k $ \files -> catchBoolIO $ do - Legacy.meteredWriteFileChunks meterupdate f files L.readFile + meteredWriteFileChunks meterupdate f files L.readFile return True retrieveEncrypted :: FilePath -> ChunkConfig -> (Cipher, Key) -> Key -> FilePath -> MeterUpdate -> Annex Bool |