diff options
author | Joey Hess <joey@kitenet.net> | 2014-08-03 15:35:23 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2014-08-03 15:40:01 -0400 |
commit | b87dfe5ddfb3686ab0088c09e6e70bd7275a1f16 (patch) | |
tree | 67218881a26ab597dada971414376201610bb1a8 /Remote/Hook.hs | |
parent | 38880b605f2bb22a9e1547e3407676b4bd89935c (diff) |
roll ChunkedEncryptable into Special and improve interface
Allow disabling progress displays, for eg, rsync.
Diffstat (limited to 'Remote/Hook.hs')
-rw-r--r-- | Remote/Hook.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/Remote/Hook.hs b/Remote/Hook.hs index 0668e2ca9..efbd9f8ba 100644 --- a/Remote/Hook.hs +++ b/Remote/Hook.hs @@ -18,7 +18,6 @@ import Config import Config.Cost import Annex.UUID import Remote.Helper.Special -import Remote.Helper.ChunkedEncryptable import Utility.Env type Action = String @@ -35,7 +34,7 @@ remote = RemoteType { gen :: Git.Repo -> UUID -> RemoteConfig -> RemoteGitConfig -> Annex (Maybe Remote) gen r u c gc = do cst <- remoteCost gc expensiveRemoteCost - return $ Just $ chunkedEncryptableRemote c + return $ Just $ specialRemote c (simplyPrepare $ store hooktype) (simplyPrepare $ retrieve hooktype) Remote { |