From b87dfe5ddfb3686ab0088c09e6e70bd7275a1f16 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 3 Aug 2014 15:35:23 -0400 Subject: roll ChunkedEncryptable into Special and improve interface Allow disabling progress displays, for eg, rsync. --- Remote/External.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'Remote/External.hs') diff --git a/Remote/External.hs b/Remote/External.hs index 1c22a589b..c00093402 100644 --- a/Remote/External.hs +++ b/Remote/External.hs @@ -15,7 +15,6 @@ import Types.CleanupActions import qualified Git import Config import Remote.Helper.Special -import Remote.Helper.ChunkedEncryptable import Utility.Metered import Logs.Transfer import Logs.PreferredContent.Raw @@ -43,7 +42,7 @@ gen r u c gc = do Annex.addCleanup (RemoteCleanup u) $ stopExternal external cst <- getCost external r gc avail <- getAvailability external r gc - return $ Just $ chunkedEncryptableRemote c + return $ Just $ specialRemote c (simplyPrepare $ store external) (simplyPrepare $ retrieve external) Remote { -- cgit v1.2.3